Ciao a tutti,
ho la seguente funzione:
Function AddImage(sTitle, sDate, sDescription, sSourceSmall, sSourceNormal, iHits, iCategory, iVersion, iIsAlbum, iAuthor, bValid)
Dim oCn, rSQL
Set oCn = DBConnexion(DB_MAIN)
rSQL = "INSERT INTO images (iTitle, iDate, iDescription, iSourceSmall, iSourceNormal, iHits, iCategory, iVersion, iIsAlbum, iAuthor, iValid) VALUES ('" & SQLEncrypt(sTitle) & "', '" & sDate & "', '" & SQLEncrypt(sDescription) & "', '" & SQLEncrypt(sSourceSmall) & "', '" & SQLEncrypt(sSourceNormal) & "', " & iHits & ", " & iCategory & ", " & iVersion & ", " & iIsAlbum & ", " & iAuthor & ", " & bValid & ", 1,'"& sPseudo &"')"
DBExecute oCn, rSQL
oCn.Close
Set oCn = Nothing
AddImage = True
End Function
quando però compilo i campi del form, mi viene restituito questo errore:
ErroreSQL -2147217900: [Microsoft][Driver ODBC Microsoft Access] Errore di sintassi nell'istruzione INSERT INTO.
SQL : INSERT INTO images (iTitle, iDate, iDescription, iSourceSmall, iSourceNormal, iHits, iCategory, iVersion, iIsAlbum, iAuthor, iValid) VALUES ('xcfdgfd', '20051016 11:10:14', 'dfgd', 'http://localhost/public/upload/images/carlo512.jpg', 'http://localhost/public/upload/images/carlo513.jpg', 0, 28, 6, , , 1, 1,'WebMaster')
xcfdgfd ed dfgd sono Titolo e descrizione che ho messo io a caso... ma dov'è l'errore?
Saluti,
Carlo