Nome
(Privacy policy ) <%if strnull=1 and session("nome")="" then response.write "" & "Inserite il Nome!" & "
Cognome
" & "Inserite il Cognome!" & "
Indirizzo E:Mail
" & "Inserire la vostra email!" & "
Per
favore controlli accuratamente l'esattezza
Ci
indichi soltanto la forma di pagamento che preferisce usare:
<%=session("pagamento")%>
AMERICAN EXPRESS
BANK ORDER - BONIFICO
BANCARIO
CARTA SI
DINERS
EUROCARD
MASTER CARD
LECANFORE CARD
MAJORDOMO CARD
VISA
Preferisco inviare il numero della mia carta
di credito e la sua scadenza via fax.
Se ha selezionato la possibilità di inviare
gli estremi della Sua carta di credito via fax, allora invii
le Sue comunicazioni allo : 06 71 35 05 62 . Grazie.
<%if strnull=1 and session("pagamento")="" then response.write "" & "Inserite la forma di pagamento!" & "
Numero
e scadenza Carta di Credito :
A protezione dei
vostri dati, queste informazioni Vi saranno richieste dal nostro Ufficio
Centrale Prenotazioni al momento della conferma della disponibilità
attraverso meccanismi di trasmissione criptata che provvederemo ad
indicarvi successivamente.
Recapito
telefonico
Numero
Ospiti
<%=session("persone")%>
1
2
3
4
5
<%
'Apertura connessione DB
'Select Case session("strstate")
'case "California" : sql = "SELECT * FROM Agenzie_usa Where AGENZIE_USA.NAZIONE Like '"&session("strstate")&"' ORDER BY CITTA ASC"
'case "Florida" : sql = "SELECT * FROM Agenzie_usa Where AGENZIE_USA.NAZIONE Like '"&session("strstate")&"' ORDER BY CITTA ASC"
'case "New York" : sql = "SELECT * FROM Agenzie_usa Where AGENZIE_USA.NAZIONE Like '"&session("strstate")&"' ORDER BY CITTA ASC"
'case "Illinois" : sql = "SELECT * FROM Agenzie_usa Where AGENZIE_USA.NAZIONE Like '"&session("strstate")&"' ORDER BY CITTA ASC"
'case "Rest Of Usa" : sql = "SELECT * FROM Agenzie_usa Where AGENZIE_USA.NAZIONE Like '"&session("strstate")&"' ORDER BY CITTA ASC"
'case "Canada" : sql = "SELECT * FROM Agenzie_usa Where AGENZIE_USA.NAZIONE Like '"&session("strstate")&"' ORDER BY CITTA ASC"
'case "Iowa" : sql = "SELECT * FROM Agenzie_usa Where AGENZIE_USA.NAZIONE Like '"&session("strstate")&"' ORDER BY CITTA ASC"
'case else
'sql = "SELECT * FROM Agenzie Where AGENZIE.NAZIONE Like '"&session("strstate")&"' ORDER BY CITTA ASC"
'end select
'Set OBJdbConnection=Server.CreateObject("ADODB.Connection")
'OBJdbConnection.open "fpdb/rate_car.mdb"
'Set RS=OBJdbConnection.Execute(sql)
%>
Data
di arrivo
" selected><%=datepart("d",now()+1)%>
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
" selected><%=datepart("M",now())%>
01
02
03
04
05
06
07
08
09
10
11
12
" selected><%=datepart("YYYY",now())%>
"><%=datepart("YYYY",now())+1%>
Time
00
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
00
15
30
45
Data
di partenza
" selected><%=datepart("d",now()+1)%>
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
" selected><%=datepart("M",now())%>
01
02
03
04
05
06
07
08
09
10
11
12
" selected><%=datepart("YYYY",now())%>
"><%=datepart("YYYY",now())+1%>
Time
00
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
00
15
30
45
Richieste
e comunicazioni particolari
