<%@LANGUAGE="VBSCRIPT"%> <% Dim rsEnq__MMColParam rsEnq__MMColParam = "0" if(Request.QueryString("TripRef") <> "") then rsEnq__MMColParam = Request.QueryString("TripRef") set rsEnq = Server.CreateObject("ADODB.Recordset") rsEnq.ActiveConnection = objConn rsEnq.Source = "SELECT * FROM trips WHERE TripRef = '" + Replace(rsEnq__MMColParam, "'", "''") + "'" rsEnq.CursorType = 0 rsEnq.CursorLocation = 2 rsEnq.LockType = 3 rsEnq.Open rsEnq_numRows = 0 set rsCountry = Server.CreateObject("ADODB.Recordset") rsCountry.ActiveConnection = objConn rsCountry.Source = "SELECT * FROM Countries order by country" rsCountry.CursorType = 0 rsCountry.CursorLocation = 2 rsCountry.LockType = 1 rsCountry.Open rsCountry_numRows = 0 set rsActivity = Server.CreateObject("ADODB.Recordset") rsActivity.ActiveConnection = objConn rsActivity.Source = "SELECT * FROM activities order by activity" rsActivity.CursorType = 0 rsActivity.CursorLocation = 2 rsActivity.LockType = 1 rsActivity.Open rsActivity_numRows = 0 %>

" class="linkblack">Tailormade Tours | Single Travellers Email "> Title Mr Mrs Ms Miss Dr First Name Surname Telephone Address Postcode Date of Travel 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 January February March April May June July August September October November December 2005 2006 Duration (days) 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 21+ No People Travelling 1 2 3 4 5 6 7 8 or more Budget Per Person < £900 £900-£1500 £1500-£2000 £2000-£2500 £2500-£3500 £3500-£4500 £4500+ Please Outline of your Holiday Ideas and Requirements Where did you hear about realworld? Please choose Freeserve Search Beeb.com Yahoo Goto Search Google Another Search Engine Trip-Zone Link Another Internet Link The Telegraph The Mail The Independent The Guardian The Times Wanderlust Another Publication Company Promotion From a friend/colleague I'm a previous client BugBog