<%@LANGUAGE="VBSCRIPT"%> <% Dim rs_woodstock__MMColParam rs_woodstock__MMColParam = "Woodstock" If (Request("MM_EmptyValue") <> "") Then rs_woodstock__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs_woodstock Dim rs_woodstock_cmd Dim rs_woodstock_numRows Set rs_woodstock_cmd = Server.CreateObject ("ADODB.Command") rs_woodstock_cmd.ActiveConnection = MM_conRemax_STRING rs_woodstock_cmd.CommandText = "SELECT HomeID, HomeCategory, HomeAddress, HomeCity, HomePrice, DateAdded FROM remax_stratfordhomes_ca.homes WHERE Area = ? ORDER BY DateAdded DESC" rs_woodstock_cmd.Prepared = true rs_woodstock_cmd.Parameters.Append rs_woodstock_cmd.CreateParameter("param1", 200, 1, 255, rs_woodstock__MMColParam) ' adVarChar Set rs_woodstock = rs_woodstock_cmd.Execute rs_woodstock_numRows = 0 %> <% Dim rs_open_house__MMColParam rs_open_house__MMColParam = "Stratford" If (Request("MM_EmptyValue") <> "") Then rs_open_house__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs_open_house Dim rs_open_house_numRows Set rs_open_house = Server.CreateObject("ADODB.Recordset") rs_open_house.ActiveConnection = MM_conRemax_STRING rs_open_house.Source = "SELECT HomeID, HomeCategory, HomeAddress, HomeCity, HomePrice, HomeTaxes, Bedrooms, Bathrooms, HomeStyle, HomeType, DateAdded FROM remax_stratfordhomes_ca.homes WHERE Area = '" + Replace(rs_open_house__MMColParam, "'", "''") + "' ORDER BY DateAdded DESC" rs_open_house.CursorType = 0 rs_open_house.CursorLocation = 2 rs_open_house.LockType = 1 rs_open_house.Open() rs_open_house_numRows = 0 %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = 7 Repeat2__index = 0 rs_woodstock_numRows = rs_woodstock_numRows + Repeat2__numRows %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 7 Repeat1__index = 0 rs_open_house_numRows = rs_open_house_numRows + Repeat1__numRows %>

Stratford & Surrounding Area

Woodstock & Surrounding Area

<% While ((Repeat1__numRows <> 0) AND (NOT rs_open_house.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rs_open_house.MoveNext() Wend %>

? <%= "HomeID=" & rs_open_house.Fields.Item("HomeID").Value %>"><%=(rs_open_house.Fields.Item("HomeAddress").Value)%> , <%= FormatCurrency((rs_open_house.Fields.Item("HomePrice").Value), 2, -2, -2, -2) %>
<%=(rs_open_house.Fields.Item("HomeCity").Value)%>, <%=(rs_open_house.Fields.Item("HomeCategory").Value)%>

<% While ((Repeat2__numRows <> 0) AND (NOT rs_woodstock.EOF)) %> <% Repeat2__index=Repeat2__index+1 Repeat2__numRows=Repeat2__numRows-1 rs_woodstock.MoveNext() Wend %>

? <%= "HomeID=" & rs_woodstock.Fields.Item("HomeID").Value %>"><%=(rs_woodstock.Fields.Item("HomeAddress").Value)%> , <%= FormatCurrency((rs_woodstock.Fields.Item("HomePrice").Value), 2, -2, -2, -2) %>
<%=(rs_woodstock.Fields.Item("HomeCity").Value)%>, <%=(rs_woodstock.Fields.Item("HomeCategory").Value)%>

Privacy Act | Relocation Package | Complete Moving Checklist

Disclaimer: All information is deemed reliable but not guaranteed and should be independently verified. All properties are subject to prior sale, change or withdrawal. RE/MAX a-b Realty Ltd. brokerage shall not be responsible for any typographical errors, misinformation, misprints and shall be held totally harmless. Please call RE/MAX a-b Realty Ltd. for more details, in Stratford at 519-273-2821 or in St. Marys at 519-284-4720 or in Woodstock st 519-536-7535.

<% rs_woodstock.Close() Set rs_woodstock = Nothing %> <% rs_open_house.Close() Set rs_open_house = Nothing %>