Overflow

[FWD]

ciao ho questo problema che non riesco a risolvere e non mi spiego cosa possa essere.
ho creato una pagina riservata dove l'utente gestisce una gallery fotografica, ho creato un file per l'upload creando sia la stringa sql per update sia per into in dbaccess, la cosa strana è che aggiornando un record già esistente tutto va a buon fine unvece se devo inserire un nuovo record mi dà Overflow,perchè?
qualcuno può aiutarmi?

[optime]

una risposta così al buio, senza manco vede' due righe de codice?

[FWD]

hai ragione scusami, te lo posto

SQL = "INSERT INTO Foto (Codice, NFoto, Categoria, Descrizione, IMG,Visibile, Data) VALUES ('" & Codice & "', '" & NFoto & "', " & Categoria & ", '" & Descrizione & "','" & IMG & "','" & Visibile & "', " & DataToStr(Now()) & ")"
Conn.Execute(SQL)

SQL = "UPDATE Foto Set Codice = '" & Codice & "', NFoto = '" & NFoto & "',Categoria = " & Categoria & ",Descrizione = '" & Descrizione & "',IMG= '" & IMG & "', Visibile = " & Visibile & " WHERE ID = " & ID
Conn.Execute(SQL)

queste sono le stringhe sql per inserire o aggiornare i record su dbaccess

[optime]

saresti così gentile da posta anche la riga che ti dà l'errore (e anche qualche riga prima, così da capire meglio)

[FWD]

questo è l'errore
Microsoft JET Database Engine error '80040e57'

Overflow

/admin/update_foto.asp, line 50

la riga 50 è la stringa sql into foto

update_foto.asp è il file richiamato dal form

ecco il codice d update_foto.asp
Set fso=Server.CreateObject("Scripting.FileSystemObjec t")
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = True
upfile = Upload.Save(Server.MapPath("..\public\fotogallery\ img\"))
Set file = Upload.Files ("IMG")

ID = Upload.Form("ID")
Codice = Upload.Form("Codice")
NFoto = Replace(Upload.Form("NFoto"), "'", "''")
Categorie = Upload.Form("Categorie")
Categoria = Mid(Categorie,1,(Categorie)-1)
Descrizione = Replace(Upload.Form("Descrizione"), "'", "''")
If Upload.Form("Visibile") = "1" then Visibile = "1" Else Visibile = "0" End If

If NumFile > 0 then
Set File = Upload.Files(1)
IMG= File.OriginalFileName
Else
IMG= Upload.Form("IMG")
End If

[Roby_72]

Fatti stampare la query che ti da errore invece di eseguirla così si capisce cosa cerchi di inserire.

Roby

[carlogh]

Dato che l'errore è di overflow, potrebbe essere dato dal fatto che, ad esempio, per il campo ID della tabella hai specificato un numerico troppo piccolo (che so, Byte). Il che spiegherebbe l'errore al momento dell'inserimento, dato che ha già raggiunto il valore massimo assumibile da quel campo e non può aggiungerne di ulteriori.
Prova ad impostare come Intero o Intero lungo il campo ID e facci sapere

[FWD]

il campo id è già intero lungo ed è la chiave primaria, mi visualizza ancora overflow

[optime]

----------------------------------------------------
impariamo a fare un po' di debug

*subito* dopo la composizione della stringa SQL metti

Response.Write "maGGica SQL...: " & sql
Response.Flush

poi posta quello che viene a video
----------------------------------------------------

[Grambo]

Originariamente inviato da FWD
hai ragione scusami, te lo posto

SQL = "INSERT INTO Foto (Codice, NFoto, Categoria, Descrizione, IMG,Visibile, Data) VALUES ('" & Codice & "', '" & NFoto & "', " & Categoria & ", '" & Descrizione & "','" & IMG & "','" & Visibile & "', " & DataToStr(Now()) & ")"
Conn.Execute(SQL)

SQL = "UPDATE Foto Set Codice = '" & Codice & "', NFoto = '" & NFoto & "',Categoria = " & Categoria & ",Descrizione = '" & Descrizione & "',IMG= '" & IMG & "', Visibile = " & Visibile & " WHERE ID = " & ID
Conn.Execute(SQL)

queste sono le stringhe sql per inserire o aggiornare i record su dbaccess

curiosità: ma so tutte stringhe tranne la categoria?... O.o