header slogan box
<% if session("UserID")<>"" then sql="select * from EndUsers where ID=" & session("UserID") set rsUsers=getRecordset(sql) response.write "Welcome " & rsUsers("FirstName") & " " agentName="" sql="SELECT Agents.Name, AgentLocations.Location, EndUsers.ID, EndUsers.AgentLocationID "&_ "FROM Agents INNER JOIN "&_ " AgentLocations ON Agents.ID = AgentLocations.AgentID INNER JOIN "&_ " EndUsers ON AgentLocations.ID = EndUsers.AgentLocationID "&_ "WHERE (EndUsers.ID = "& session("UserID") &") " set rsAgentName=getRecordset(sql) if not rsAgentName.eof then agentName="(" & rsAgentName("name") & "-" & rsAgentName("Location") & ")" response.write AgentName & "|" end if %> <%if request("pagename")<>"" and session("UserID")="" then%> <%end if%> <%if session("UserID")="" then%> Please Sign In <%else%> Profile Log Out <%end if%> Quotesbookings

Instant online Quotes & Reservations

Countries

Error processing SSI file