怎么样用吸管折星星:asp 求助

<%
dim conn,mystr,mysql,Conn_String,sDbSrc,username,password,sex,truename,postcode,address,sign,email,oicp,homepag,birthday,rs,id
sDbSrc="bfcp/mdb/baofeng.mdb"
username=Request.Form("username")
password=request.Form("password")
sex=Request.Form("sex")
truename=request.Form("truename")
postcode=request.Form("postcode")
address=request.Form("address")
sign=request.Form("sign")
email=request.Form("email")
oicq=request.Form("oicq")
homepag=request.Form("homepag")
birthday=request.Form("birthday")

Set Conn=Server.CreateObject("ADODB.Connection")
Conn_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(sDbSrc)
Conn.open Conn_String
set rs=Server.CreateObject("ADODB.RecordSet")
mysql="Select * from webuser where id=0"
rs.open mysql,conn,1,3
rs.addnew
rs("username")=username
rs("sex")=sex
rs("password")=password
rs("truename")=truename
rs("postcode")=postcode
rs("address")=address
rs("sign")=sign
rs("email")=email
rs("oicq")=oicq
rs("homepag")=homepag
rs("birthday")=birthday
rs.Update
rs.close
response.Write"successfully!"
response.Write"<a href=index.asp>"&"返回"&"</a>"
%>
就是这段代码。。
rs.open mysql,conn,1,3 这是第22行

错误类型：
Microsoft JET Database Engine (0x80040E10)
至少一个参数没有被指定值。
/other/BF/addzhuce.asp, 第 22 行
不好 ， 我忘了给分了