ASP与access数据库连接的问题，急！！！

[stillyuan]

ASP后台源程序如下：

<%@LANGUAGE="VBSCRIPT"%>
<%
username = request("username")
userpwd = request("userpwd")
a="gongming"
b="sdsdfs"
dim conn
set conn = server.createobject("adodb.connection")
conn.open = "provider=microsoft.jet.oledb.4.0;" & "data source = " & server.mappath("data.mdb")
set rs=server.createobject("adodb.recordset")
sql="select * from userinfo where userid=""&username&""and password=""&userpwd&"""
rs.Open sql,conn,1,1
rs.AddNew
rs("userid") = a
rs("password") =b
rs.Update
rs.close()
%>

出错信息如下：
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft JET Database Engine 错误 '80040e10'

至少一个参数没有被指定值。

/flashsave/plogin5.asp，行12

大家帮我看一下到底是什么问题啊?