请问各位大虾，这是什么原因？

Question

这是原代码
<%
DbPath = SERVER.MapPath("../mdb/zbdshop.mdb")
response.Write dbpath
response.End()
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DbPath
set rs=server.createobject("adodb.recordset")
sql= "SELECT * FROM shoplist "
       rs.Open sql,conn , 1, 3
       rs.Addnew 
       rs("gmrid") =request("gmrid")
       rs("fjgs") =request("fjgs")
       rs("fjr") =request("fjr")
       rs("sjgs") =request("sjgs")
       rs("sjr") =request("sjr")
       rs("qsr") =request("qsr")
   rs("riqi" )=request("riqi")
       rs("jine") =request("jine")
   rs("qssj") =request("qssj")
       rs("beizhu") =request("beizhu")
       rs.Update
rs.close
'set rs=server.createobject("adodb.recordset")
'sql="update cpb set cpbm='"&cpbm&"' where cpid=" & cpbm  
'rs.open sql,conn,3,3
response.Write "<p align='center'></p>"
response.write "<p align='center'><font color='#ff0000'>恭喜您!添加成功！</font></p>"
response.write "<p align='center'><font color='#ff0000'><a href='addcp.asp'>继续添加产品</a>!</font></p>"     
conn.close
response.end
%>

Answer 1

从语法上看是正确的
看看你所有的request值是否正确传递。

Answer 2

ADODB.Recordset (0x800A0CC1)
在对应所需名称或序数的集合中，未找到项目。
这个错误信息一般是说你建立的数据集中的字段名，在数据库中并不存在
检查你的以下代码，看看rs("xxxx")中的xxxx名字和数据库中的是否一致。rs("gmrid") =request("gmrid")
       rs("fjgs") =request("fjgs")
       rs("fjr") =request("fjr")
       rs("sjgs") =request("sjgs")
       rs("sjr") =request("sjr")
       rs("qsr") =request("qsr")
   rs("riqi" )=request("riqi")
       rs("jine") =request("jine")
   rs("qssj") =request("qssj")
       rs("beizhu") =request("beizhu")