logo pyrenees65
Ski SKI
spas SPAS
Accomodation ACCOMMODATION
Leisure LEISURE
discovery DISCOVERY
shops SHOPS
Restaurants RESTAURANTS
Real estate REAL ESTATE
Services SERVICES
Diary DIARY
Write-us
Local Site
Toy Country
Luz Saint Sauveur, Luz Ardiden, Gavarnie, Barèges-Tourmalet
Pic du Midi de Bigorre.
   return Home / Diary
Diary Diary


<% Dim dcnDB 'As ADODB.connection Dim recordset, brecordset 'As ADODB.Recordset Dim Pays, granderegion, region, departement, vallee, mois, annee ' As ADODB.String Set dcnDB = server.createObject("ADODB.Connection") dcnDB.Open "am12972" pays = "France" granderegion = "Pyrénées" region = "Midi-Pyrénées" departement = 65%>
Select your search criteria
<%recordset.Close set recordset = nothing brecordset.close set brecordset = nothing%> <%Set recordset = server.createObject("ADODB.recordset") SQL = "SELECT DISTINCT ville from agenda WHERE (pays='"&pays&"') and (granderegion='"&granderegion&"') and (region='"®ion&"') and departement=" & departement recordset.Open SQL, dcnDB, 1, 1%> <%recordset.Close set recordset = nothing dcnDB.Close Set dcnDB = nothing%>
<%Set recordset = server.createObject("ADODB.recordset") SQL = "SELECT DISTINCT mois from agenda WHERE (pays='"&pays&"') and (granderegion='"&granderegion&"') and (region='"®ion&"') and departement=" & departement recordset.Open SQL, dcnDB, 1, 1%> <%Set brecordset = server.createObject("ADODB.recordset") SQL = "SELECT DISTINCT annee from agenda WHERE (pays='"&pays&"') and (granderegion='"&granderegion&"') and (region='"®ion&"') and departement=" & departement brecordset.Open SQL, dcnDB, 1, 1%>
Date
Village