%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset2__MMColParam Recordset2__MMColParam = "1" if (Request.QueryString("england") <> "") then Recordset2__MMColParam = Request.QueryString("england") %> <% set Recordset2 = Server.CreateObject("ADODB.Recordset") Recordset2.ActiveConnection = MM_bilg_STRING Recordset2.Source = "SELECT region, area FROM accomodation WHERE region = '" + Replace(Recordset2__MMColParam, "'", "''") + "'" Recordset2.CursorType = 0 Recordset2.CursorLocation = 2 Recordset2.LockType = 3 Recordset2.Open() Recordset2_numRows = 0 %> <% Dim Recordset3__MMColParam Recordset3__MMColParam = "1" if (Request.QueryString("ireland") <> "") then Recordset3__MMColParam = Request.QueryString("ireland") %> <% set Recordset3 = Server.CreateObject("ADODB.Recordset") Recordset3.ActiveConnection = MM_bilg_STRING Recordset3.Source = "SELECT region, area FROM accomodation WHERE region = '" + Replace(Recordset3__MMColParam, "'", "''") + "'" Recordset3.CursorType = 0 Recordset3.CursorLocation = 2 Recordset3.LockType = 3 Recordset3.Open() Recordset3_numRows = 0 %> <% Dim Recordset4__MMColParam Recordset4__MMColParam = "1" if (Request.QueryString("wales") <> "") then Recordset4__MMColParam = Request.QueryString("wales") %> <% set Recordset4 = Server.CreateObject("ADODB.Recordset") Recordset4.ActiveConnection = MM_bilg_STRING Recordset4.Source = "SELECT region, area FROM accomodation WHERE region = '" + Replace(Recordset4__MMColParam, "'", "''") + "'" Recordset4.CursorType = 0 Recordset4.CursorLocation = 2 Recordset4.LockType = 3 Recordset4.Open() Recordset4_numRows = 0 %> <% Dim Recordset1__MMColParam Recordset1__MMColParam = "1" if (Request.QueryString("scotland") <> "") then Recordset1__MMColParam = Request.QueryString("scotland") %> <% set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_bilg_STRING Recordset1.Source = "SELECT region, area FROM accomodation WHERE region = '" + Replace(Recordset1__MMColParam, "'", "''") + "'" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 3 Recordset1.Open() Recordset1_numRows = 0 %>
|
|
|
|
|
| In this section,
you will find a selection of the key golfing "hubs"
which will get you into the thick of the action. For each
we have supplied a selection of hotels, plus travel times
to the courses in the area, other hubs and major airports. |
|
|
|
|
| or select your destination by clicking on the above map | |
| ©
Copyright BritishIslesLinksGolf.com - 2005 All Rights
Reserved 05/19/2005 |
|