ADODB.Recordset '800a0bcd'

hzsuper2009 2009-07-17 12:58:01

<html>

<head>
<title>完成度</title>
</head>

<body>
<%
dim q
q=session("key")
sql="Select [a],[b],[c] from [USRC_SEIKANSITU] where a='"&q&"'"
set rs = conn.execute(sql)
if rs.Eof and rs.Bof then

response.Write("没有数据")
response.End

End if

dim i
i=0
response.Write"<form method=""POST"" action="""">"
response.Write"<table border><tr><th>MPPS</th><th>MBOM</th><th>かんばん</th></tr>"
Do While Not rs.Eof
i = i+1
response.Write" <tr><td><input type=""text"" value= "&rs("a")&" name ="&i&" size=""20""></td>"
session(i)=rs("a")
i = i+1
response.Write"<td><input type=""text"" value= "&rs("b")&" name ="&i&" size=""20""></td>"
session(i)=rs("b")
i = i+1
response.Write"<td><input type=""text"" value= "&rs("c")&" name ="&i&" size=""20""></td></tr>"
session(i)=rs("c")
rs.MoveNext
Loop
response.Write"</table>"
response.Write"<p><input type=""submit"" value=""更新"" name =""B8"" ><input type=""submit"" value=""削除"" name =""B9""></p>"
response.Write"</form>"
rs.close
%>

</body>
</html>

<% if Request.ServerVariables("REQUEST_METHOD") = "POST" and request.form("B8")="更新" then
dim y
q=session("key")
sql="Select [a],[b],[c] from [USRC_SEIKANSITU] where a='"&y&"'"
rs.open sql,conn,1,3
end if
dim boxcount
boxcount = 1

Do While boxcount < i

rs("a")= request.form(boxcount) 错在这里
rs("b")= request.form(boxcount+1)
rs("c")= request.form(boxcount+2)
rs.Update
response.Write("<p>"&Session(boxcount)&","&Session(boxcount+1)&","&Session(boxcount+2)&"</p>")
boxcount = boxcount + 3
rs.MoveNext
Loop
rs.close
end if
%>
更新之后报错说ADODB.Recordset '800a0bcd' BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。谢谢大家帮忙!!!!

...全文

131 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

lzp4881 2009-07-17

打赏
举报

rs("a")= request.form("boxcount") 错在这里
rs("b")= request.form("boxcount"&1)
rs("c")= request.form("boxcount"&2)

hookee 2009-07-17

打赏
举报

Do While boxcount < i 此处i的值是多少？能确保总数小于等于rs的记录集中记录数吗？

hzsuper2009 2009-07-17

打赏
举报

是不是上面的半段读到最后,没有做回滚啊

hzsuper2009 2009-07-17

打赏
举报

[Quote=引用 1 楼 lzp4881 的回复:]
rs("a")= request.form("boxcount") 错在这里
rs("b")= request.form("boxcount"&1)
rs("c")= request.form("boxcount"&2)
[/Quote]
这句话没有错误啊,就是说数据库里面的没有数据,到底是怎么会事啊,谢谢