<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% set combo = Server.CreateObject("ADODB.Recordset") combo.ActiveConnection = MM_conRemax_STRING combo.Source = "SELECT agents.AgentName, agents.AgentSurname, homes.HomeAddress, homes.HomeID, homes.HomePrice, homes.HomeCategory, homes.RemaxNumber, homes.HomeType FROM agents, homes WHERE agents.AgentID = homes.AgentID AND (agents.AgentID = 59 or AgentID2 = 59) ORDER BY HomePrice ASC" combo.CursorType = 0 combo.CursorLocation = 2 combo.LockType = 3 combo.Open() combo_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 combo_numRows = combo_numRows + Repeat1__numRows %> Kristin Sainsbury - Re/Max a-b Realty ltd., Realtor
direct: 519.275.5001
fax: 519.273.4202

BedfordNeighbours.com

 

My Listings

Please feel free to contact me to obtain more detailed information about any property listed with the M.L.S. or by our company.

To view Re/Max listings:

Please check back frequently to view new information.

<% If Not combo.EOF Or Not combo.BOF Then %> <% While ((Repeat1__numRows <> 0) AND (NOT combo.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 combo.MoveNext() Wend %>
Address
Price
Type
? <%= "HomeID=" & combo.Fields.Item("HomeID").Value %>"> <%=(combo.Fields.Item("HomeAddress").Value)%>
<%= FormatCurrency((combo.Fields.Item("HomePrice").Value), -1, -2, -2, -2) %>
<%=(combo.Fields.Item("HomeCategory").Value)%>
<% End If ' end Not combo.EOF Or NOT combo.BOF %>

 
Resale
Residential
New Home Sales
Investment
<% combo.Close() %>