<%@LCID=1036%> <%'on écrit la page en cache avant le navigateur Response.Buffer = True Response.Expires = -1 Response.AddHeader "Pragma", "no-cache" Response.AddHeader "cache-control", "no-store" ReqRefVoy = Request("ref") ReqVoyId = Request("idvoy") ReqSemaine = Request("semaine") ImageVoy = "" IF ReqRefVoy = "SURFCAMP" THEN response.redirect "http://www.speedresa.com/moteurs/voyages/detail_voyage.php?IDvoyage=26708&AGENCE=V04" END IF %> <% Function notag(txt) ' Vire les balises dim regEx Set regEx = New RegExp regEx.Global = True ' ^ signifie "tout sauf" ' + signifie 1 car au moins regEx.Pattern = "<[^>]+>" ' remplace par vide notag = regEx.replace(txt,"") end function %> <% IF ReqVoyId <> "" THEN %> Réservation <%= fdVilleArr%> :: <%= notag(StrDepart) %> :: <%= fdVilleDep %> :: Voyages Etudiants <% ELSE %> <%= fdVilleArr%> :: <%= fdEvenementVoy%> :: Voyages Etudiants <% END IF %>
 
<% '2 mise en page possibles : ski ou pas ski. 'CAS 1 : HORS SKI FAUX / FALSE IF fdSemaineMax = "" THEN'si 1 date alors c'est le ski %>

<%= fdVilleArr%>
<%= fdEvenementVoy & fdDureeSej %>
<%= StrPartirDe%>

<% 'si on connait l'id de la ville alors on peut afficher les rens. sur le départ : DONC TABLEAU IF ReqVoyId <> "" THEN %> <% ELSE %>


<%response.write Detail_Depart()%>
<%response.write Inclus_Voyage("CInclus", tmpfdinclus)%> 
<%response.write Inclus_Voyage("CInclusNon", tmpfdinclusnon)%> 



<% response.write Option_Destination(ReqRefVoy)%> 
<% 'FIN DU TAB DES RENSEIGN SUR LE DEPART END IF %>

<%= ImageVoy%>
<%= fdDescriptVoy%>

<%response.write Inclus_Voyage("CInclus", tmpfdinclus)%> 
<%response.write Inclus_Voyage("CInclusNon", tmpfdinclusnon)%> 

<% response.write Tab_List_Depart(ReqRefVoy) %>

<% response.write Option_Destination(ReqRefVoy)%> 

<% 'CAS 2 : PRESENTATION POUR LE SKI ELSE %>

<%= fdVilleArr%>
<%= fdEvenementVoy%>une semaine
<%= StrPartirDe%>

<% 'si on connait l'id de la ville alors on peut afficher les rens. sur le départ : DONC TABLEAU IF (ReqSemaine <> "") AND (ReqVoyId <> "") THEN %> <%ELSE%>


<% response.write ImageVoy%>

<%response.write Detail_Depart_Ski()%>

<%= fdDescriptVoy%>

<% 'FIN DU TAB DES RENSEIGN SUR LE DEPART END IF %>
<%response.write Inclus_Voyage("CInclus", tmpfdinclus)%>
<%response.write Inclus_Voyage("CInclusNon", tmpfdinclusnon)%> 
<% response.write Tableau_Tarif(ReqRefVoy) %>
!! Pour réserver, cliquez dans le tableau sur la formule qui vous convient !!
<% response.write Option_Destination(ReqRefVoy) 'Tant qu'il n'y a pas d'options pour le ski on laisse le comment %>

<%END IF%>
E-mail : contact@VoyagesEtudiants.com - ©VEC - Rens. 04 67 58 36 36 - Fax 04 78 39 66 07