阿尔巴尼亚人民军:ASP代码问题，请指教！急……

ID=request("ID")
cname=request("cname")
sex=request("sex")
birth=request("birth")
native=request("native")
phone=request("phone")
mobile=request("mobile")
college=request("college")
major=request("major")
lastedu=request("lastedu")
career=request("career")
workplace=request("workplace")
duty=request("duty")
ctitle=request("ctitle")
worktime=request("worktime")
addr=request("addr")
experience=request("experience")
achieve=request("achieve")
set conn=server.CreateObject("adodb.connection")
conn.connectionstring="provider=microsoft.jet.oledb.4.0;"&"data source="& server.MapPath("expert.mdb")
conn.open
set rs=server.CreateObject("adodb.recordset")
set rs1=server.CreateObject("adodb.recordset") sql="select * from expert where cname='"&cname&"'"
rs.open sql ,conn,1,1
if rs.eof or rs.bof then
rs1.open "expert",conn,1,2
40行…… rs1.addnew array(cname,sex,birth,native,phone,mobile,college,major,lastedu,career,workplace,duty,ctitle,worktime,addr,experience,achieve),array(cname,sex,birth,native,phone,mobile,college,major,lastedu,career,workplace,duty,ctitle,worktime,addr,experience,achieve)
%>
提示错误信息，ADODB.Recordset (0x800A0CC1)
在对应所需名称或序数的集合中，未找到项目。
/专家库二/addnew.asp, 第 40 行