<% Dim SQL, rs, rs2 set rs = Server.CreateObject("ADODB.Recordset") SQL = "SELECT (daz_listings.listingid*(1+datepart(s,getdate()))*(1+datepart(ms,getdate())))%1000 sortid, daz_listings.title, daz_listings.address, " & _ "daz_listings.city, daz_listings.phone, daz_listings.description, daz_listings.photo, " & _ "daz_listings.logo, daz_listings.email, daz_listings.url, daz_states.state " & _ "FROM daz_listings INNER JOIN daz_states ON daz_listings.stateId = daz_states.stateId " & _ "INNER JOIN daz_displays ON daz_listings.listingId = daz_displays.listingId " & _ "WHERE daz_displays.typeId = 2 " & _ "AND realtorId = 9 " & _ "AND daz_displays.approved = 1 " & _ "ORDER BY sortid " set rs = oConn.execute(SQL) set rs2 = Server.CreateObject("ADODB.Recordset") SQL = "SELECT daz_listings.title, daz_listings.address, " & _ "daz_listings.city, daz_listings.phone, daz_listings.description, daz_listings.photo, " & _ "daz_listings.logo, daz_listings.url, daz_states.state " & _ "FROM daz_listings INNER JOIN daz_states ON daz_listings.stateId = daz_states.stateId " & _ "INNER JOIN daz_displays ON daz_listings.listingId = daz_displays.listingId " & _ "WHERE daz_displays.typeId = 1 " & _ "AND realtorId = 9 " & _ "AND daz_displays.approved = 1 " set rs2 = oConn.execute(SQL) '######################################################################################## %> Dream Arizona | Flagstaff Real Estate | Agents, Realtors | Az
Home     About Us     Advertising     Listing     Site Directory     Members Login Bringing Dream Homes to Reality  

Flagstaff Real Estate
Agents and Realtors


Finding Dream Homes in Flagstaff Arizona

Featured Agents   Feature Your Site Here
Flagstaff Real Estate

Dream Flagstaff Real Estate

Preferred Realtors in Flagstaff including Forest Highlands, Flagstaff Ranch and Munds Park. Visit this site for indepth information about things to do in Flagstaff AZ.

<% Dim count count = 0 If Not (rs.BOF And rs.EOF) Then rs.movefirst Do Until rs.EOF '######################################################################################## 'featured ad If count <> 0 then Response.write("
") End If Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("
") If trim(rs("photo")) <> "" then Response.write("") Else Response.write("") End If Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("
" & rs("title") & "") If trim(rs("email")) <> "" then Response.write("email") End If If (trim(rs("email")) <> "") and (trim(rs("url")) <> "") then Response.write(" | ") End If If trim(rs("url")) <> "" then Response.write("visit website") End If Response.write("
") Response.write("" & rs("phone") & "
") Response.write("" & rs("address") & "
") Response.write("" & rs("city") & ", " & rs("state") & "
") Response.write("
") If trim(rs("logo")) <> "" then Response.write("") Else Response.write("") End If Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("
" & rs("description") & "
") Response.write("
") count = count + 1 rs.moveNext Loop Else '######################################################################################## 'default featured Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("
") End If set rs = nothing 'standard listing text Response.write("") Response.write("") Response.write("") Response.write("") Response.write("
") Response.write("") Response.write("") Response.write("
Standard ListingsList Your Site
") If Not (rs2.BOF And rs2.EOF) Then rs2.movefirst Do Until rs2.EOF '######################################################################################## 'standard ad Response.write("") Response.write("") If trim(rs2("url")) <> "" then Response.write("") Else Response.write("") End If Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("") Response.write("
" & rs2("title") & "" & rs2("title") & "" & rs2("phone") & "
" & rs2("address") & " " & rs2("city") & ", " & rs2("state") & "
" & rs2("description") & "
") rs2.moveNext Loop End If set rs2 = nothing 'end of table Response.write("
") %>

 


In the Greater Phoenix area: Ahwatukee, Chandler, Gilbert, Glendale, Mesa, Peoria, Phoenix and Tempe. In Scottsdale visit Paradise Valley, Fountain Hills and Carefree. Other Arizona areas, see Flagstaff, Kingman, Lake Havasu, Page, Payson, Prescott, Sedona, Tucson and Yuma.

 

 



By Using This Website, You Agree to Our Terms of Website Use
The Az Directory of Real Estate provides information and connections intended to make buying and owning an Arizona home a more rewarding experience. The guide covers homebuyers and home sellers throughout Arizona including Phoenix, Scottsdale, Tucson, Sedona, Flagstaff, Tempe, Glendale, Peoria, Paradise Valley, Payson, Prescott, Yuma and other towns within Arizona.

©2004 Subia Worldwide. Targeted Real Estate Advertising
| Website Design by Subia Creative |

Webmaster