ASP　高手请进！！急急急 — 编程爱好者社区

ADODB.Field 错误 '80020009'

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/JXSystem/delete_ku_Ok.asp，行 0

数据库可以添加进记录。无法读出。为什么呢　？

原代码如下：
<%@ language="vbscript"%>

<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from delete_detail"
rs.open sqltext,conn,3,3

'添加一个记录到数据库
rs.addnew
rs("form_Id")= "1" & zeros(5 -len(rs.recordcount+1)) & (rs.recordcount+1)
rs("Class_1")=request.form("class_1_name")
rs("Class_2")=request.form("class_2_name")
rs("Product_name")=request.form("product_name")
rs("P_num")=request.form("P_num")
rs("jsh_people")=request.form("jsh_people")
rs("LL_people")=request.form("LL_people")
rs("bzh")=request.form("bzh")
rs.update
rs.close
%>

<script language=vbscript runat=server>
'zeros 函数产生一定数量的零
function zeros(intnum)
   dim i,strout
   for i=1 to intnum
       strout = strout & "0"
       next
       zeros=strout
       end function
       </script>
<%
set rs_detail=server.createobject("adodb.recordset")
sqltext2="select * from delete_detail where  Product_name='" & request.form("p_name") & "'"
rs_detail.open sqltext2,conn,1,1
%>

<html>
<head>
<title>出库成功</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<STYLE type=text/css>.main {
    FONT-SIZE: 12px
}
.main1 {
    FONT-SIZE: 14px
}
.main2 {
    FONT-SIZE: 16px
}
.main3 {
    FONT-SIZE: 7px
}
.main4 {
    FONT-SIZE: 10px
}
A:link {
    COLOR: #ffffff; TEXT-DECORATION: none
}
A:visited {
    COLOR: #ffffff; TEXT-DECORATION: none
}
A:active {
    COLOR: #ff0000; TEXT-DECORATION: none
}
A:hover {
    COLOR: #aa0000; TEXT-DECORATION: underline
}
</STYLE>
</head>

<body  text="#000000">

<p align="center"><br>
<br>
</p>
<div align="center">
        <center>
            <TABLE cellSpacing=1 cellPadding=4 width=429 bgColor=#000000 height="144">
              <TBODY>

      <TR vAlign=top bgColor=#8CAAE7>
        <TD class=main1 colSpan=2 width="415" height="10"></TD>
      </TR>
              <TR vAlign=top bgColor=#BECFF1>
                <TD class=main1 colSpan=2 width="415" height="32"><font color="#FF0000">出库成功--</font></TD>
              </TR>
              <TR bgColor=#BECFF1>

        <TD class=main1 width=415 bgColor=#BECFF1 height=25 align="right"><SPAN
                  class=main1>所属大类：</SPAN></TD>
                <TD class=main1 width=301 height=25><%=rs_detail("class_1")%></TD></TR>
              <tr>

        <TD class=main1 width=415 bgColor=#BECFF1 height=25 align="right"><SPAN
                  class=main1>所属小类：</SPAN></TD>
                <TD class=main1 width=301 height=25 bgcolor="#BECFF1"><%=rs_detail("class_2")%></TD>
              </tr>
              <tr>

        <TD class=main1 width=415 bgColor=#BECFF1 height=25 align="right"><SPAN
                  class=main1>产品名称：</SPAN></TD>
                <TD class=main1 width=301 height=25 bgcolor="#BECFF1"><%=rs_detail("product_name")%></TD>
              </tr>
              <tr>

        <TD class=main1 width=415 bgColor=#BECFF1 height=25 align="right"><SPAN
                  class=main1>数量：</SPAN></TD>
                <TD class=main1 width=301 height=25 bgcolor="#BECFF1"><%=rs_detail("product_num")%> （件）</TD>
              </tr>
               <tr>

        <TD class=main1 width=415 bgColor=#BECFF1 height=25 align="right"><SPAN
                  class=main1>经手人：</SPAN></TD>
                <TD class=main1 width=301 height=25 bgcolor="#BECFF1"><%=rs_detail("jsh_people")%> </TD>
              </tr>
              <tr>

        <TD class=main1 width=415 bgColor=#BECFF1 height=25 align="right"><SPAN
                  class=main1>领料人：</SPAN></TD>
                <TD class=main1 width=301 height=25 bgcolor="#BECFF1"><%=rs_detail("LL_people")%> </TD>
              </tr>
              <tr>

        <TD class=main1 width=415 bgColor=#BECFF1 height=25 align="right"><SPAN
                  class=main1>备注：</SPAN></TD>
                <TD class=main1 width=301 height=25 bgcolor="#BECFF1"><%=rs_detail("bzh")%> </TD>
              </tr>
              <TR vAlign=top bgColor=#BECFF1>
                <TD class=main1 colSpan=2 width="415" height="15"></TD></TR>
              <TR bgColor=#BECFF1>
                <TD class=main1 colSpan=2 width="415" height="27">
                  <p align="center"> 
<INPUT type="button" class=main  size=3 value='续继' name=Submit2 onClick="window.location.href='delete_ku.asp';">
                </TD></TR>

      <TR bgColor=#8CAAE7>
        <TD class=main1 colSpan=2 width="415" height="4"></TD>
      </TR></TBODY></TABLE>
        </center>
      </div>
</body>
</html>
<%
rs.close
rs_detail.close
conn.close
%>

主题：ASP　高手请进！！急急急

回复列表（共3个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：ASP 高手请进！！急急急

回复列表 （共3个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：ASP　高手请进！！急急急

回复列表（共3个回复）