Questo è il codice che sto usando!

<%
comments=Trim(Request.Form("comments"))
name=Trim(Request.Form("name"))
email=Trim(Request.Form("email"))
image=Trim(Request.Form("image"))
font=Trim(Request.Form("font"))
color=Trim(Request.Form("color"))
immagine=Trim(Request.Form("img"))
response.write(immagine)

If LEN(email)=0 Then email="Not disclosed"
If LEN(immagine)=0 Then immagine="No img"

' deal with apostrophes and disable any html codes

name=REPLACE(name, "'", "&#39")
name=REPLACE(name, ">", "")
name=REPLACE(name, "<", "")
comments=REPLACE(comments, "<", "")
comments=REPLACE(comments, "'", "&#39")
comments=REPLACE(comments, ">", "")
email=REPLACE(email, "<", "")
email=REPLACE(email, "'", "")
email=REPLACE(email, ">", "")

MyCols="[Name],[Comments],[IP Address],[Posted],[Image],[Font],[Color],[email],[immagine]"
MyVals="'"&name&"',"
MyVals=MyVals & "'"&comments&"',"
MyVals=MyVals & "'"&Request.ServerVariables("REMOTE_ADDR")&"', "
subtime=NOW
MyVals=MyVals & "'"&subtime&"',"
MyVals=MyVals & "'"&image&"',"
MyVals=MyVals & "'"&font&"',"
MyVals=MyVals & "'"&color&"',"
MyVals=MyVals & "'"&email&"'"
MyVals=MyVals & "'"&immagine&"'"

MySql="INSERT INTO Visitors ("&MyCols&") VALUES ("&MyVals&")"

'dbf=Server.MapPath ("guestbook.mdb")
dbf=Server.MapPath ("../../dati/store.mdb")
set my_conn= Server.CreateObject("ADODB.Connection")
my_Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + dbf

my_Conn.Execute MySql
my_Conn.Close

%>


e funziona tutto fino a quando ho pensato di inserire un'altro campo nel db: il campo immagine!

questo è l'errore che mi da:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][Driver ODBC Microsoft Access] Il numero dei valori nella query non corrisponde a quello dei campi di destinazione.

/piazzaerbe/it/addguest.asp, line 235

Se potete aiutarmi!!
grazie!