خطا در objrs.update

[rezacarlos]

با سلام
به نظر شما چه اشکالی در کد زیر است ؟ (هاست به خط objrs.update خطا می گیرد) <br><br><div align="left">set objconn=server.createobject("ADODB.connection")<br>objconn.connectionstring="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" &amp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Server.MapPath("question.mdb")<br><br>objconn.open<br>set objrs=server.createobject("ADODB.Recordset")<br>objrs.open "tb", objconn , ,3 , adcmdTable<br>objrs.addnew<br>objrs("1") = s1<br>objrs("2") = s2<br><u><b>objrs.update</b></u><br>objrs.close<br>set objrs=nothing<br>objconn.close<br>set objconn=nothing<br><br>با تشکر<br></div>

[rezacarlos]

set objconn=server.createobject("ADODB.connection")
objconn.connectionstring="DRIVER={Microsoft Access Driver (*.mdb)} ;DBQ=" & Server.MapPath("db1.mdb")

objconn.open
set objrs=server.createobject("ADODB.Recordset")
objrs.open "Table2", objconn , ,3 , adcmdTable
objrs.addnew
objrs("mozo") = request.form("moz")
objrs("mail") = request.form("email")
objrs("matn") = request.form("S1")
objrs.update
objrs.close
set objrs=nothing
objconn.close
set objconn=nothing