<% if isnumeric(request.querystring("id")) = false or request.querystring("id")="" then
response.redirect "/missing.asp"
end if
%>
<%
set conn = server.createObject("adodb.connection")
%>
<%
query = "select owner from listings where id="& request.queryString("id")
'on error resume next
set ownerresult = conn.execute(query)
if ownerresult("owner") = "coldwell" then
strQuery = "SELECT listings.id,listings.owner,listings.virtualtour1, listings.photo, listings.photo1,listings.photo2,listings.photo3,listings.photo4,listings.photo5,listings.photo6,listings.photo7,listings.photo8,listings.price,realtorid,listings.address,listings.highlightphrase,listings.for_rent,listings.for_lease,listings.rentalrate,listings.bedrooms,listings.bathrooms,listings.squarefoot,listings.proptype,listings.city,listings.prov,Roster_000974.[Company Name] as company,Roster_000974.[first name] as first,Roster_000974.[last name] as last,Roster_000974.phone,Roster_000974.fax, Roster_000974.email,listings.description FROM listings INNER JOIN Roster_000974 ON listings.realtorid = Roster_000974.id WHERE listings.id =" & request.queryString("id")
elseif ownerresult("owner") = "homelife" then
strQuery = "SELECT listings.id,listings.owner,listings.virtualtour1,listings.virtualtourtype, listings.photo, listings.photo1,listings.photo2,listings.photo3,listings.photo4,listings.photo5,listings.photo6,listings.photo7,listings.photo8,listings.photo9,listings.photo10,listings.photo11,listings.photo12,listings.photo13,listings.photo14,listings.photo15,listings.photo16,listings.price,listings.address,listings.highlightphrase,listings.for_rent,listings.for_lease,listings.rentalrate,listings.bedrooms,listings.bathrooms,listings.squarefoot,listings.proptype,listings.city,listings.prov,Xxxxxagt.[agentid] as agentid ,Xxxxxagt.[firstname] as first,Xxxxxagt.[lastname] as last,Xxxxxagt.Url as linkUrl,Xxxxxagt.phonenumber as phone,Xxxxxagt.faxnumber as fax, 'Homelife Realty Services' as company, Xxxxxagt.emailaddress as email,listings.description FROM listings INNER JOIN Xxxxxagt ON listings.realtorid = Xxxxxagt.agentid WHERE listings.id =" & request.queryString("id")
elseif ownerresult("owner") = "macrealty" then
strQuery = "SELECT listings.id,listings.owner,listings.virtualtour1, listings.photo, listings.photo1,listings.photo2,listings.photo3,listings.photo4,listings.photo5,listings.photo6,listings.photo7,listings.photo8,listings.price,listings.address,listings.highlightphrase,listings.for_rent,listings.for_lease,listings.rentalrate,listings.bedrooms,listings.bathrooms,listings.squarefoot,listings.proptype,listings.city,listings.prov,[realtylink-office-imported].officename,[realtylink-agent-imported].agentid as agentid ,[realtylink-agent-imported].agentname as last, [realtylink-agent-imported].phone as phone,[realtylink-agent-imported].fax as fax, 'MacDonald Realtors' as company, [realtylink-agent-imported].email as email,listings.description, listings.comments1 FROM listings INNER JOIN [realtylink-agent-imported] ON listings.realtorid = [realtylink-agent-imported].agentid INNER JOIN [realtylink-office-imported] ON [realtylink-agent-imported].officeid = [realtylink-office-imported].officeid WHERE listings.id = " & request.queryString("id")
elseif ownerresult("owner") = "dfh" then
strQuery = "SELECT listings.id,listings.owner,listings.virtualtour1, listings.photo, listings.photo1,listings.photo2,listings.photo3,listings.photo4,listings.photo5,listings.photo6,listings.photo7,listings.photo8,listings.price,listings.address,listings.highlightphrase,listings.for_rent,listings.for_lease,listings.rentalrate,listings.bedrooms,listings.bathrooms,listings.squarefoot,listings.proptype,listings.city,listings.prov,dfhrealtors20020508.col001 as agentid ,dfhrealtors20020508.col003 as last,dfhrealtors20020508.col002 as first, dfhrealtors20020508.Col009 as phone,dfhrealtors20020508.col010 as fax, dfhrealtors20020508.Col004 as company, dfhrealtors20020508.Col011 as email,listings.description, listings.comments1 FROM listings INNER JOIN dfhrealtors20020508 ON listings.realtorid = dfhrealtors20020508.col001 WHERE listings.id = " & request.queryString("id")
else
strQuery = "SELECT listings.id,listings.owner,listings.virtualtour1, listings.photo, listings.photo1,listings.photo2,listings.photo3,listings.photo4,listings.photo5,listings.photo6,listings.photo7,listings.photo8,listings.price,listings.address,listings.realtorid, listings.highlightphrase,listings.for_rent,listings.for_lease,listings.rentalrate,listings.bedrooms,listings.bathrooms,listings.squarefoot,listings.proptype,listings.city,listings.prov,realtors.company,realtors.first,realtors.last,realtors.phone,realtors.fax,realtors.linkurl, realtors.email,listings.description, listings.comments1 FROM listings INNER JOIN realtors ON listings.realtorid = realtors.id WHERE realtors.id not in "&bannedid&" and listings.id =" & request.queryString("id")
end if
set rsListings = conn.Execute(strQuery)
adcity = rslistings("city")
%>
<%
if rsListings("address") <> "" then
address = server.urlencode(rsListings("address"))
else
address = "Address+Not+Available"
end if
description = rsListings("description")
if description<>"" then
description = replace(description,"""","'")
end if
if rslistings.eof then
response.redirect "/missing.asp"
end if
%>
WorldWide Referrals - <% =rsListings("address") & " " %> <% = " " & rsListings("city") %> - <% =rsListings("highlightphrase") %>
