Errore di sintassi in SQL

[maximum]

Correggi il "-1" (definendo il campo email di tipo stringa) e poi prova così:

<%

Dim bar

 if len(request.form("bar")) > 0 then 
    bar = True
 else
    bar = False
 end if		
 
SQL = "UPDATE hotel 
       set nome_struttura = '" & Request.Form("struttura") & "', 
       proprietario = '" & Request.Form("titolare") & "', 
       persona_rif = '" & Request.Form("rif_struttura") & "', 
       url= '" & Request.Form("url") & "', 
       email = '" & Request.Form("email") & "', 
       n_camere = '" & Request.Form("n_camere") & "', 
       prezzo_sing_min = '" & Request.Form("min_sing") & "', 
       prezzo_sing_max = '" & Request.Form("max_sing") & "', 
       prezzo_doppia_min = '" & Request.Form("min_doppia") & "', 
       prezzo_doppia_max = '" & Request.Form("max_doppia") & "', 
       bar = " & bar & " WHERE id = " & session("id") 
%>

[Rob2002]

Rispondo a Maximun.

Il campo bar è una flag (in Access si/no)che visualizzo in un form per eventualmente essere modificato, ma quello che succede l'ho postato prima.

[optime]

Originariamente inviato da maximum
Un campo email al mio paese, viene definito tipo stringa, non true o false... :rollo:

questo perché al tuo paese siete sicuri che nel campo email vada sempre e solo l'indirizzo email. a casa mia si è più tolleranti, chissà, magari nel campo email ci va un flag che indica che quel cliente vuole o non vuole ricevere email...

[maximum]

Leggi il post precedente e prova l'UPDATE.

[maximum]

Originariamente inviato da optime
questo perché al tuo paese siete sicuri che nel campo email vada sempre e solo l'indirizzo email. a casa mia si è più tolleranti, chissà, magari nel campo email ci va un flag che indica che quel cliente vuole o non vuole ricevere email...

OK, ma in quel caso, consentimi, non chiami il campo "email", ma magri "flg_email".

Poi ognuno ha i suoi standard...

[Rob2002]

Ottengo questo:

UPDATE hotel set nome_struttura = 'Hotel Roberto & Lella & Puppy', proprietario = 'Puppy', persona_rif = 'Scuzzy', url= 'http://http://www.pippo.it', email = 'aaa@aol.com', n_camere = '10', prezzo_sing_min = '10', prezzo_sing_max = '10', prezzo_doppia_min = '20', prezzo_doppia_max = '20', bar = 'Vero' WHERE id = 6

[maximum]

Non dovresti ottenere 'Vero', ma Vero.
Copia e incolla questo codice e riprova, postando l'UPDATE qua:

<%

Dim bar

 if len(request.form("bar")) > 0 then 
    bar = True
 else
    bar = False
 end if		
 
SQL = "UPDATE hotel 
       set nome_struttura = '" & Request.Form("struttura") & "', 
       proprietario = '" & Request.Form("titolare") & "', 
       persona_rif = '" & Request.Form("rif_struttura") & "', 
       url= '" & Request.Form("url") & "', 
       email = '" & Request.Form("email") & "', 
       n_camere = '" & Request.Form("n_camere") & "', 
       prezzo_sing_min = '" & Request.Form("min_sing") & "', 
       prezzo_sing_max = '" & Request.Form("max_sing") & "', 
       prezzo_doppia_min = '" & Request.Form("min_doppia") & "', 
       prezzo_doppia_max = '" & Request.Form("max_doppia") & "', 
       bar = " & bar & " WHERE id = " & session("id") 
%>

[Rob2002]

Ti posto anche l'errore sul db.

UPDATE hotel set nome_struttura = 'Hotel Roberto & Lella & Puppy', proprietario = 'Puppy', persona_rif = 'Scuzzy', url= 'http://http://www.pippo.it', email = 'aaa@aol.com', n_camere = '10', prezzo_sing_min = '10', prezzo_sing_max = '10', prezzo_doppia_min = '20', prezzo_doppia_max = '20', bar = Vero WHERE id = 6
Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

[optime]

1. controlla i nomi dei campi
2. metti i nomi dei campi tra parentesi quadre
3. prova a sotituire Vero con -1 (se il server è inglese potrebbe non riconoscere Vero come True)
4. se ci sono dei campi numerici (es i prezzi) i valori NON vanno tra apici

[Rob2002]

Ora è Ok! Bastava sostituire a true e false il valore -1 e 0.

Grazie a Maximun e Optime. Siete GRANDIIIIIII!