<%session("lang")="_ita"%> Hotel Champagne
Home Presentazione Galleria Prenotazione Dove siamo Contattaci  

<%if errodesc<>"" then %> <%=errodesc%> <% errodesc="" end if %>
<% mydbstring="DBQ=" & Server.Mappath("/db/hotel.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" ' stringa DB Set rs1= Server.CreateObject("ADODB.Recordset") 'strSQL= "SELECT * FROM offerte WHERE (al>Now() AND lastminute=1);" strSQL= "SELECT * FROM offerte" rs1.Open StrSQL,mydbstring,1,2,1 if not rs1.eof then Set rs2= Server.CreateObject("ADODB.Recordset")%> <%end if%> <%rs1.close strSQL= "SELECT * FROM offerte WHERE (((offerte.[al])>Now()) AND ((offerte.lastminute)<>1)or (offerte.lastminute) is null);" rs1.Open StrSQL,mydbstring,1,2,1 if not rs1.eof then Set rs2= Server.CreateObject("ADODB.Recordset")%> <%end if rs1.close%>
    <% do while not rs1.EOF strSQL2= "SELECT * FROM tipologie where idtipologia="& rs1("idtipologia") rs2.Open StrSQL2,mydbstring,1,2,1 if not rs2.eof then tipstanza=rs2("tipologia"& session("lang")) end if %>
 dal <%=rs1("dal")%> al <%=rs1("al") & " "%> <%=tipstanza%> da <%=rs2("costo")%> Euro a <%=rs1("prezzopromo")%> Euro
<% rs1.movenext rs2.close loop %>
    <% do while not rs1.EOF strSQL2= "SELECT * FROM tipologie where idtipologia="& rs1("idtipologia") rs2.Open StrSQL2,mydbstring,1,2,1 if not rs2.eof then tipstanza=rs2("tipologia"& session("lang")) bambino=rs2("bambino") adulto=rs2("adulto") end if %>
 dal 3/1/2004 al 5/1/2004 <%=tipstanza%> da <%=rs2("costo")%> Euro a <%=rs1("prezzopromo")%> Euro
<% rs1.movenext loop %>
  <%'INIZIO STANZE ---------------------------------------------------------------%> <% strSQL= "SELECT * FROM tipologie order by ordine" rs1.Open StrSQL,mydbstring,1,2,1 c1=0 do while not rs1.eof c1=c1+1 %> <%rs1.movenext loop rs1.close %> <%'Fine tipo stanze-------------------------------------------------------------------------%>
Data di arrivo :    
Numero di notti :
<%=rs1("tipologia" & session("lang"))%> :
<%if rs1("bambino")=1 then %> <%end if if rs1("adulto")=1 then %> <% end if%>
letto aggiuntivo:  
 bambino
adulto
    
 
 
            italiano
            english
           français
           deutsch
           español