<%@LANGUAGE="VBSCRIPT"%> <% Dim rsWeek__MMColParam rsWeek__MMColParam = "1" If (Request.QueryString("idWeek") <> "") Then rsWeek__MMColParam = Request.QueryString("idWeek") End If %> <% Dim rsWeek Dim rsWeek_numRows Set rsWeek = Server.CreateObject("ADODB.Recordset") rsWeek.ActiveConnection = MM_cromwellhouse_STRING rsWeek.Source = "SELECT * FROM cromwellhouse.ch_calendar WHERE idWeek = " + Replace(rsWeek__MMColParam, "'", "''") + "" rsWeek.CursorType = 0 rsWeek.CursorLocation = 2 rsWeek.LockType = 1 rsWeek.Open() rsWeek_numRows = 0 %> Cromwell House

Cromwell House
Holywell Bay, Cornwall


Home page|
Facilities|
Local Area|
Directions|
Prices|
Contact Us|
Terms and Conditions

Contact Cromwell House

You can either contact us by telephone on 02476 463840, or use the contact form below:

First name:
   
Surname:
 ®    
     
Address:
Telephone:
 ®
e-mail:
 ®
Town:
     
Postcode:
     
     
Message: ®
   
 

 

 

 

 

 
© 2005 - www.cromwellhouse.co.uk
<% rsWeek.Close() Set rsWeek = Nothing %>