loisirs hautes-pyrénées - sport et activités sportives en midi-pyrénéees
Ski SKI
Thermalisme THERMALISME
Hébergement HEBERGEMENTS
loisirs hautes-pyrénées - sport et activités sportives en midi-pyrénéees LOISIRS
découverte DECOUVERTE
Artisanat ARTISANAT / ART
commerce TERROIR
Elevage ELEVAGE
commerce COMMERCE
Restauration RESTAURATION
Immobilier IMMOBILIER
Services SERVICES
Insolite INSOLITE
Agenda AGENDA
Ecrivez-nous


   retour Accueil / Loisirs, activités sportives
Loisirs, activités sportives loisirs hautes-pyrénées - sport et activités sportives en midi-pyrénéees
Carte des Hautes Pyrénées

cliquez !
<% Dim dcnDB 'As ADODB.connection Dim recordset 'As ADODB.Recordset Dim pays, granderegion, region, departement, vallee, choixloisir, choixvallee, loisir ' 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%>
Sélectionnez vos critères de recherche
<%Set recordset = server.createObject("ADODB.recordset") SQL = "SELECT DISTINCT loisir from loisirs WHERE (pays='"&pays&"') and (granderegion='"&granderegion&"') and (région='"®ion&"') and departement=" & departement recordset.Open SQL, dcnDB, 1, 1%> <%recordset.Close set recordset = nothing%> <%Set recordset = server.createObject("ADODB.recordset") SQL = "SELECT DISTINCT vallee from loisirs WHERE (pays='"&pays&"') and (granderegion='"&granderegion&"') and (région='"®ion&"') and departement=" & departement recordset.Open SQL, dcnDB, 1, 1%> <%recordset.Close set recordset = nothing dcnDB.Close Set dcnDB = nothing%>
Loisirs
vallée