Parc National des hautes pyrénées - Maison du parc de Gavarnie
Ski SKI
Thermalisme THERMALISME
Hébergement HEBERGEMENTS
Loisirs LOISIRS
Parc National des hautes pyrénées - Maison du parc de Gavarnie DECOUVERTE
Artisanat ARTISANAT / ART
commerce TERROIR
Elevage ELEVAGE
commerce COMMERCE
Restauration RESTAURATION
Immobilier IMMOBILIER
Services SERVICES
Insolite INSOLITE
Agenda AGENDA
Ecrivez-nous
   retour Accueil / Lieux à visiter / parc national
Parc National des Pyrénées Parc National des hautes pyrénées - Maison du parc de Gavarnie


<% Dim dcnDB 'As ADODB.connection Dim recordset 'As ADODB.Recordset Dim url, choixtype, SQL, Pays, granderegion, region, departement, vallee, type1, type2, terrain, organisme, qualite, personnesmini, personnesmaxi, nbrechambres, nom, village, telephone, lien ' As ADODB.String choixlogement = "découverte" Set dcnDB = server.createObject("ADODB.Connection") dcnDB.Open "pyrenees65.mdb" SQL = "SELECT * from decouvertes WHERE (type='"&choixlogement&"') order by vallee" %> <%Set recordset = server.createObject("ADODB.recordset") recordset.Open SQL, dcnDB, 1, 1 %>
<%if recordset.EOF then%>
Il n'existe aucun enregistrement répondant à vos critères
<%else%> <% recordset.movefirst%> <%Do while Not recordset.EOF%> <%if recordset("lien")<>"" then%> <%else%> <%end if%> <%recordset.movenext Loop%>
Village Vallée Nom Cliquez
<%=recordset("lieu")%> <%=recordset("vallee")%> <%=recordset("nom")%> <%if recordset("image") <> "" then%> " target="_blank">" BORDER=0 WIDTH=40 HEIGHT=40> <%else%> " target="_blank"> <%end if%>  

<%end if%> <%recordset.Close set recordset = nothing dcnDB.Close Set dcnDB = nothing %>