Questo script contiene degli errori http://asp.html.it/script/vedi/955/d...m-al-database/

questo é il codice (da precisare che vicino alle & c'é un valore denominato amp e che non viene trascritto in questo messaggio)

<%
if request("id")=1 then
on error resume next
dim strQuery
strQuery="INSERT INTO tabella("
dim strValori
strValori=" VALUES("
dim strSql
strSql=""

for each item in request.form
if item<>"Submit" then
strQuery= strQuery &amp; item &amp;","
strValori= strValori &amp; "'"&amp;server.HTMLEncode(request.form(item))&amp; "',"
end if
next

strQuery=mid(strQuery,1,len(strQuery)-1) &amp;")"
strValori=mid(strValori,1,len(strValori)-1) &amp;")"

set rs =server.createObject("ADODB.Recordset")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn &amp; " DBQ=" &amp; Server.MapPath("database.mdb")
strSql= strQuery &amp; strValori
rs.open strSql,strConn
set rs=nothing
if err.number<>0 then
response.write err.number &amp;"
"&amp;err.description
else
response.write "inserimento avvenuto con successo"
end if

response.end
end if
%>
<form method="post" action="script.asp?id=1">
<input type="text" name="campo1">

<input type="text" name="campo2">

<input type="text" name="campo3">

<input type="submit" name="Submit" value="Invia">
</form>


Questo é quello che dice il server quando fai il submit

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/script.asp, line 13

strQuery= strQuery &amp; item &amp;","
-----------------------^


Come va sistemato?