%
id=Request("id")
accessdb="http://www.wigstonwolery.free-online.co.uk/france.mdb"
myDSN = "Driver={Microsoft Access Driver (*.mdb)};"
myDSN = myDSN & "DBQ=" & Server.MapPath(accessdb)
Query="SELECT * from locations WHERE departmentid LIKE '%"
Query= Query & Request("id") & "%'"
Query = Query & " ORDER BY location"
Set DataConn = Server.CreateObject("ADODB.Connection")
DataConn.open(myDSN)
Set RSloc = DataConn.execute(Query)
Querydept="SELECT * from departments WHERE departmentid LIKE '%"
Querydept= Querydept & Request("id") & "%'"
Querydept = Querydept & " ORDER BY departmentname"
Set RSdept = DataConn.execute(Querydept)
thisregionid= RSdept("regionid")
Queryreg="SELECT * from regions WHERE regionid LIKE '%"&thisregionid&"%'"
Set RSreg = DataConn.execute(Queryreg)
thiscountryid= RSreg("countryid")
Querycty="SELECT * from countries WHERE countryid LIKE '%"&thiscountryid&"%'"
Set RScty = DataConn.execute(Querycty)
%>
A Motorhome on Tour - France: Pictures of 15 Cantal Department, Auvergne
From our Database we have found these Tourist Information Links to other websites Aurillac ... Aurillac et son Pays - Office de Tourisme - Bienvenue dans le Cantal Cantal ... Bienvenue sur le site officiel Destination Cantal, France Murat-le-Quaire ... Ville de Murat 15300 Cantal Auvergne Neuveglise ... Neuveglise, Office de Tourisme Pleaux ... La ville de Pleaux vous accueille ! Saint-Flour ... Bienvenue sur le Site de l'Office de Tourisme