Errore inserimento dati nel database

[Vincent.Zeno]

l'errore parla chiaro

stampa la query per verificarla e controlla tutti i campi del db

edit: consenti anche valori nulli

[ghis65]

ho capito meglio cosa succede
quando inserisco indirizzospedizione mi cancella il campo indirizzo. ho provato a mettere indirizzo come campo non richiesto e mi cancella il dato di email. ho modificato anche quello nel db come nn richiesto e mi scrive sul database il campo indirizzospdizione e nn più indirizzo ed email. Me li cancella!!

ti posto codice

<%
end if

elseif len(Request.form("conferma.x"))>0 then
IDCliente = Session("IDCliente")
SchedaClienteNome = Session("SchedaClienteNome")
SchedaClienteCognome = Session("SchedaClienteCognome")
SchedaClienteIndirizzo = Session("SchedaClienteIndirizzo")
SchedaClienteIndirizzospedizione = Session("SchedaClienteIndirizzospedizione")
SchedaClienteCodicePostale = Session("SchedaClienteCodicePostale")
SchedaClienteComune = Session("SchedaClienteComune")
SchedaClienteProvincia = Session("SchedaClienteProvincia")
SchedaClienteTelefono = Session("SchedaClienteTelefono")
SchedaClienteFax = Session("SchedaClienteFax")
SchedaClienteEmail = Session("SchedaClienteEmail")
SchedaClienteMetodoPagamento = Session("SchedaClienteMetodoPagamento")
INFO_EMPTYFIELDS = Session("INFO_EMPTYFIELDS")
QuantiArticoliInScontrino = Session("QuantiArticoliInScontrino")
ScontrinoInScontrino = Session("ScontrinoInScontrino")
ScontrinoIDArticolo = Session("ScontrinoIDArticolo")
ScontrinoCodiceArticolo = Session("ScontrinoCodiceArticolo")
ScontrinoDenominazioneArticolo = Session("ScontrinoDenominazioneArticolo")
ScontrinoQuantitativoArticolo = Session("ScontrinoQuantitativoArticolo")
ScontrinoConfezioneArticolo = Session("ScontrinoConfezioneArticolo")
ScontrinoPrezzoArticolo = Session("ScontrinoPrezzoArticolo")
SpeseDiSpedizione = Session("SpeseDiSpedizione")
'calcola l'id
ID = session("ID")
ID=ID+1
session("ID") = ID
IDCliente = Session.SessionID & "." & cstr(ID)

'inserimento
sql=""
sql = sql + "INSERT INTO clienti "
sql = sql + "(id, nome, cognome, indirizzo, cap, comune, provincia, telefono, fax, email, Indirizzospedizione) VALUES "
sql = sql + "('" & IDCliente & "', "
sql = sql + "'" & SchedaClienteNome & "', "
sql = sql + "'" & SchedaClienteCognome & "', "
sql = sql + "'" & SchedaClienteIndirizzo & "', "
sql = sql + "'" & SchedaClienteIndirizzospedizione & "', "
sql = sql + "'" & SchedaClienteCodicePostale & "', "
sql = sql + "'" & SchedaClienteComune & "', "
sql = sql + "'" & SchedaClienteProvincia & "', "
sql = sql + "'" & SchedaClienteTelefono & "', "
sql = sql + "'" & SchedaClienteFax & "', "
sql = sql + "'" & SchedaClienteEmail & "') "
DatabaseWebstore.execute sql
IDOrdine = Session("IDOrdine")
Importo=0
for i = 1 to QuantiArticoliInScontrino
Importo = Importo + (ScontrinoQuantitativoArticolo(i)*ScontrinoPrezzoArticolo(i))
next
sql=""
sql = sql + "INSERT INTO ordini "
sql = sql + "(id, idcliente, data, importo, spesedispedizione, mododipagamento) VALUES "
sql = sql + "('" & IDOrdine & "', "
sql = sql + "'" & IDCliente & "', "
sql = sql + "'" & Data & "', "
sql = sql + "" & replace(cstr(Importo), ",", ".") & ", "
sql = sql + "" & replace(cstr(SpeseDiSpedizione), ",", ".") & ", "
sql = sql + "'" & SchedaClienteMetodoPagamento & "')"
DatabaseWebstore.execute sql
ID = session("ID")
'scrive i dati di scontrino
for i = 1 to QuantiArticoliInScontrino
ID=ID+1
IDVoceDiScontrino = Session.SessionID & "." & cstr(ID)
session("ID") = ID
'
sql=""
sql = sql + "INSERT INTO scontrini "
sql = sql + "(id, idordine, CodiceArticolo, DenominazioneArticolo, PrezzoArticolo, QuantitativoArticolo) VALUES "
sql = sql + "('" & IDVoceDiScontrino & "', "
sql = sql + "'" & IDOrdine & "', "
sql = sql + "'" & ScontrinoCodiceArticolo(i) & "', "
sql = sql + "'" & ScontrinoDenominazioneArticolo(i) & "', "
sql = sql + "" & replace(cstr(ScontrinoPrezzoArticolo(i)), ",", ".") & ", "
sql = sql + "" & ScontrinoQuantitativoArticolo(i) & ")"
DatabaseWebstore.execute sql
next

'termine acquisto
AcquistoOK=true
Session("AcquistoOK")=AcquistoOK
Session("aperta")=""
DatabaseWebstore.close
set DatabaseWebstore = nothing
else
IDCliente = Session("IDCliente")
SchedaClienteNome = Session("SchedaClienteNome")
SchedaClienteCognome = Session("SchedaClienteCognome")
SchedaClienteIndirizzo = Session("SchedaClienteIndirizzo")
SchedaClienteIndirizzospedizione = Session("SchedaClienteIndirizzospedizione")
SchedaClienteCodicePostale = Session("SchedaClienteCodicePostale")
SchedaClienteComune = Session("SchedaClienteComune")
SchedaClienteProvincia = Session("SchedaClienteProvincia")
SchedaClienteTelefono = Session("SchedaClienteTelefono")
SchedaClienteFax = Session("SchedaClienteFax")
SchedaClienteEmail = Session("SchedaClienteEmail")
SchedaClienteMetodoPagamento = Session("SchedaClienteMetodoPagamento")
INFO_EMPTYFIELDS = Session("INFO_EMPTYFIELDS")
end if
end if
if not AcquistoOK and (len(Request.form("acquista.x"))=0 or INFO_EMPTYFIELDS <> "") then
If INFO_EMPTYFIELDS<>"" Then%>

[optime]

qui

sql=""
sql = sql + "INSERT INTO clienti "
sql = sql + "(id, nome, cognome, indirizzo, cap, comune, provincia, telefono, fax, email, Indirizzospedizione) VALUES "
sql = sql + "('" & IDCliente & "', "
sql = sql + "'" & SchedaClienteNome & "', "
sql = sql + "'" & SchedaClienteCognome & "', "
sql = sql + "'" & SchedaClienteIndirizzo & "', "
sql = sql + "'" & SchedaClienteIndirizzospedizione & "', "
sql = sql + "'" & SchedaClienteCodicePostale & "', "
sql = sql + "'" & SchedaClienteComune & "', "
sql = sql + "'" & SchedaClienteProvincia & "', "
sql = sql + "'" & SchedaClienteTelefono & "', "
sql = sql + "'" & SchedaClienteFax & "', "
sql = sql + "'" & SchedaClienteEmail & "') "
DatabaseWebstore.execute sql

l'ordine dei campi deve essere lo stesso dei valori

[optime]

per fare un po' di debug, *prima* di lanciare la query

response.write "maGGica SQL...: " & sql & "<br>"

e posta quello che viene a video

[ghis65]

Grazie Optime funziona tutto adesso

[ghis65]

non vuole funzionare oggi.
il form parte ma non scrive indirizzospedizione nel database
Lo script è così adesso

sql=""
sql = sql + "INSERT INTO clienti "
sql = sql + "(id, nome, cognome, indirizzo, cap, comune, provincia, telefono, fax, email, Indirizzospedizione) VALUES "
sql = sql + "('" & IDCliente & "', "
sql = sql + "'" & SchedaClienteNome & "', "
sql = sql + "'" & SchedaClienteCognome & "', "
sql = sql + "'" & SchedaClienteIndirizzo & "', "
sql = sql + "'" & SchedaClienteCodicePostale & "', "
sql = sql + "'" & SchedaClienteComune & "', "
sql = sql + "'" & SchedaClienteProvincia & "', "
sql = sql + "'" & SchedaClienteTelefono & "', "
sql = sql + "'" & SchedaClienteFax & "', "
sql = sql + "'" & SchedaClienteEmail & "', "
sql = sql + "'" & SchedaClienteIndirizzospedizione & "') "
DatabaseWebstore.execute sql

[Vincent.Zeno]

come sempre... stampa la query e controlla i dati in arrivo

[optime]

usa la maGGGGica!

[ghis65]

scusate ragazzi la mia ignoranza
dove la metto la stampa della query e come la scrivo.
Grazie

[ghis65]

ok ragazzi ho risolto.
Dovevo solo mettere in fila i campi rispetto alle value