<%@LANGUAGE="VBSCRIPT"%> <% Dim list_11 Dim list_11_numRows Set list_11 = Server.CreateObject("ADODB.Recordset") list_11.ActiveConnection = MM_asuites_STRING list_11.Source = "SELECT * FROM apartments AS a LEFT JOIN types AS t ON a.type_ID = t.type_ID WHERE floor_ID = 11 ORDER BY apartment_ID" list_11.CursorType = 0 list_11.CursorLocation = 2 list_11.LockType = 1 list_11.Open() list_11_numRows = 0 %> <% Dim list_12 Dim list_12_numRows Set list_12 = Server.CreateObject("ADODB.Recordset") list_12.ActiveConnection = MM_asuites_STRING list_12.Source = "SELECT * FROM apartments AS a LEFT JOIN types AS t ON a.type_ID = t.type_ID WHERE floor_ID = 12 ORDER BY apartment_ID" list_12.CursorType = 0 list_12.CursorLocation = 2 list_12.LockType = 1 list_12.Open() list_12_numRows = 0 %> <% Dim list_PH Dim list_PH_numRows Set list_PH = Server.CreateObject("ADODB.Recordset") list_PH.ActiveConnection = MM_asuites_STRING list_PH.Source = "SELECT * FROM apartments AS a LEFT JOIN types AS t ON a.type_ID = t.type_ID WHERE floor_ID = 13 ORDER BY apartment_ID" list_PH.CursorType = 0 list_PH.CursorLocation = 2 list_PH.LockType = 1 list_PH.Open() list_PH_numRows = 0 %> <% Dim list_S Dim list_S_numRows Set list_S = Server.CreateObject("ADODB.Recordset") list_S.ActiveConnection = MM_asuites_STRING list_S.Source = "SELECT * FROM apartments AS a LEFT JOIN types AS t ON a.type_ID = t.type_ID WHERE floor_ID = 14 ORDER BY apartment_ID" list_S.CursorType = 0 list_S.CursorLocation = 2 list_S.LockType = 1 list_S.Open() list_S_numRows = 0 %> <% Dim list_10 Dim list_10_numRows Set list_10 = Server.CreateObject("ADODB.Recordset") list_10.ActiveConnection = MM_asuites_STRING list_10.Source = "SELECT * FROM apartments AS a LEFT JOIN types AS t ON a.type_ID = t.type_ID WHERE floor_ID = 10 ORDER BY apartment_ID" list_10.CursorType = 0 list_10.CursorLocation = 2 list_10.LockType = 1 list_10.Open() list_10_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 list_10_numRows = list_10_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 list_11_numRows = list_11_numRows + Repeat2__numRows %> <% Dim Repeat3__numRows Dim Repeat3__index Repeat3__numRows = -1 Repeat3__index = 0 list_12_numRows = list_12_numRows + Repeat3__numRows %> <% Dim Repeat4__numRows Dim Repeat4__index Repeat4__numRows = -1 Repeat4__index = 0 list_PH_numRows = list_PH_numRows + Repeat4__numRows %>

<% While ((Repeat1__numRows <> 0) AND (NOT list_10.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 list_10.MoveNext() Wend %> FLOOR 10 Apt Type View Sqm Beds Terrace Price £ <%=(list_10.Fields.Item("apartment_ID").Value)%> <%=(list_10.Fields.Item("type_name").Value)%> <%=(list_10.Fields.Item("view_name").Value)%> <%=(list_10.Fields.Item("total_size").Value)%> <%=(list_10.Fields.Item("bedrooms").Value)%> <% if (list_10.Fields.Item("terrace1_size").Value <> "") then %> Terrace <% else %> No Terrace <% end if %> <% if (list_10.Fields.Item("availability_ID").Value = "2") then %> Under Offer <% elseif (list_10.Fields.Item("availability_ID").Value = "3") then %> Sold <% elseif (list_10.Fields.Item("availability_ID").Value = "4") then %> Reserved <% else %> <%=(list_10.Fields.Item("apart_price").Value)%> <% end if %>       <% While ((Repeat2__numRows <> 0) AND (NOT list_11.EOF)) %> <% Repeat2__index=Repeat2__index+1 Repeat2__numRows=Repeat2__numRows-1 list_11.MoveNext() Wend %> FLOOR 11 Apt Type View Sqm Beds Terrace Price £ <%=(list_11.Fields.Item("apartment_ID").Value)%> <%=(list_11.Fields.Item("type_name").Value)%> <%=(list_11.Fields.Item("view_name").Value)%> <%=(list_11.Fields.Item("total_size").Value)%> <%=(list_11.Fields.Item("bedrooms").Value)%> <% if (list_11.Fields.Item("terrace1_size").Value <> "") then %> Terrace <% else %> No Terrace <% end if %> <% if (list_11.Fields.Item("availability_ID").Value = "2") then %> Under Offer <% elseif (list_11.Fields.Item("availability_ID").Value = "3") then %> Sold <% elseif (list_11.Fields.Item("availability_ID").Value = "4") then %> Reserved <% else %> <%=(list_11.Fields.Item("apart_price").Value)%> <% end if %>   <% While ((Repeat3__numRows <> 0) AND (NOT list_12.EOF)) %> <% Repeat3__index=Repeat3__index+1 Repeat3__numRows=Repeat3__numRows-1 list_12.MoveNext() Wend %> FLOOR 12 Apt Type View Sqm Beds Terrace Price £ <%=(list_12.Fields.Item("apartment_ID").Value)%> <%=(list_12.Fields.Item("type_name").Value)%> <%=(list_12.Fields.Item("view_name").Value)%> <%=(list_12.Fields.Item("total_size").Value)%> <%=(list_12.Fields.Item("bedrooms").Value)%> <% if (list_12.Fields.Item("terrace1_size").Value <> "") then %> Terrace <% else %> No Terrace <% end if %> <% if (list_12.Fields.Item("availability_ID").Value = "2") then %> Under Offer <% elseif (list_12.Fields.Item("availability_ID").Value = "3") then %> Sold <% elseif (list_12.Fields.Item("availability_ID").Value = "4") then %> Reserved <% else %> <%=(list_12.Fields.Item("apart_price").Value)%> <% end if %>   <% While ((Repeat4__numRows <> 0) AND (NOT list_PH.EOF)) %> <% Repeat4__index=Repeat4__index+1 Repeat4__numRows=Repeat4__numRows-1 list_PH.MoveNext() Wend %> FLOOR PH Apt Type View Sqm Beds Terrace Price £ <%=(list_PH.Fields.Item("apartment_ID").Value)%> <%=(list_PH.Fields.Item("type_name").Value)%> <%=(list_PH.Fields.Item("view_name").Value)%> <%=(list_PH.Fields.Item("total_size").Value)%> <%=(list_PH.Fields.Item("bedrooms").Value)%> <% if (list_PH.Fields.Item("terrace1_size").Value <> "") then %> Terrace <% else %> No Terrace <% end if %> <% if (list_PH.Fields.Item("availability_ID").Value = "2") then %> Under Offer <% elseif (list_PH.Fields.Item("availability_ID").Value = "3") then %> Sold <% elseif (list_PH.Fields.Item("availability_ID").Value = "4") then %> Reserved <% else %> <%=(list_PH.Fields.Item("apart_price").Value)%> <% end if %> <%=(list_S.Fields.Item("apartment_ID").Value)%> <%=(list_S.Fields.Item("type_name").Value)%> <%=(list_S.Fields.Item("view_name").Value)%> <%=(list_S.Fields.Item("total_size").Value)%> <%=(list_S.Fields.Item("bedrooms").Value)%> <% if (list_S.Fields.Item("terrace1_size").Value <> "") then %> Terrace <% else %> No Terrace <% end if %> <% if (list_S.Fields.Item("availability_ID").Value = "2") then %> Under Offer <% elseif (list_S.Fields.Item("availability_ID").Value = "3") then %> Sold <% elseif (list_S.Fields.Item("availability_ID").Value = "4") then %> Reserved <% else %> <%=(list_S.Fields.Item("apart_price").Value)%> <% end if %>     Date: <%= Day(Date()) %>/<%= Month(Date()) %>/<%= Year(Date()) %> | Prices are subject to change without notice.

<% list_11.Close() Set list_11 = Nothing %> <% list_12.Close() Set list_12 = Nothing %> <% list_PH.Close() Set list_PH = Nothing %> <% list_S.Close() Set list_S = Nothing %> <% list_10.Close() Set list_10 = Nothing %>