Click here to find out more about Refined Travel Multi Centre Holidays
 
   

<% strSQL = "SELECT * FROM WebPages WHERE PageName = 'Accommodation2'" 'response.write strSQL Set objRS = Server.CreateObject("ADODB.RecordSet") objRS.Open strSQL, objConn varContent = objRS("Content") varTitle = objRS("Title") response.write varTitle %>

<% response.write varContent %>

View Map of Island


<% strSQL = "SELECT * FROM hotels WHERE category ='Mahé Hotels' order by Title" Set objRS = Server.CreateObject("ADODB.RecordSet") objRS.Open strSQL, objConn 'response.write strSQL IF objRS.EOF = "True" THEN Response.write "
NO PROPERTIES CURRENTLY AVAILABLE IN THIS AREA.

" Response.write "CLICK HERE to view all areas" Response.end ELSE END IF %>
<% response.write "" objRS.MoveFirst Do While NOT objRS.EOF response.write "" IntCount = IntCount+1 if IntCount=3 Then Response.Write "" IntCount = 0 End If %> <% objRS.MoveNext Loop objRS.Close Set objRS=nothing objConn.Close Set objConn=nothing %>
" 'PUT TABLE RESULTS HERE %> <% response.write "