<% Sub Page_Body() %>

<% sql = "SELECT * FROM hotels WHERE is_bicycle = 0 " set rs = server.createobject("adodb.recordset") rs.open sql, conn%>

<% Do While Not rs.eof %>

"><%= rs("name") %>
<% If rs("city") <> "" Then response.write rs("city") & " " %> <% If rs("city") <> "" And rs("province") <> "" Then response.write ", " %> <% If rs("province") <> "" Then response.write get_province(rs("province")) %> <% response.write "
" %> <% rs.movenext Loop set rs = nothing %>

<% sql = "SELECT * FROM tours WHERE is_bicycle = 0 " set rs = server.createobject("adodb.recordset") rs.open sql, conn%>

<% Do While Not rs.eof %>

<% End Sub %> <% Sub Page_Left() %> <% End Sub %> <% Sub Page_Right() %> <% End Sub %> <% Function Page_header() Page_header = "" End Function %>