冲突世界中文补丁:求大家帮忙(成功后还会有重谢)在网页中出现ADODB.Field (0x80020009)这样的错误类型该如何解决?

来源:百度文库 编辑:高考问答 时间:2024/04/29 23:56:55
错误类型:
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/IISHelp/8/xtadmin/qikanjieyue.asp

浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322; 56flvplayer 1.0)

网页:
POST 31 ??? /IISHelp/8/xtadmin/qikanjieyue.asp

POST Data:
duzheno=002&queren=%C8%B7%C8%CF
上面是报错页面出现的内容.
<%
if request("jieyue")="借 阅" then
set rs7=server.createobject("adodb.recordset")
sql7="select qikanno from qikan where qikanno='"&trim(request("qikanno"))&"'"
rs7.open sql7,conn,1,1
if rs7.eof and rs7.bof then
Response.Write "<body bgcolor=#FEF7ED><p align=center>" & "出错啦:<font color=#ffffff>对不起,没有此类书</font></p>"
else
set rs6=server.createobject("adodb.recordset")
sql6="select jieyue from duzhe where duzheno='"&trim(request("duzheno"))&"'"
rs6.open sql6,conn,3,3
if rs6("jieyue")>=clng(request("shuliang")) then
Response.Write "<body bgcolor=#FEF7ED><p align=center>" & "出错啦:<font color=#ffffff>对不起,您已经借满书了,不能再借了!</font></p>"
else
set rs5=server.createobject("adodb.recordset")
sql5="select jieyue from jieyueshixian"
rs5.open sql5,conn,1,1
jieshu=rs5("jieyue")
rs5.close
set rs5=nothing
set rsz=server.createobject("adodb.recordset")
sqlz="select * from jieyue"
rsz.open sqlz,conn,3,3
rsz.addnew
rsz("jszh")=trim(request("duzheno"))
rsz("jyqh")=trim(request("qikanno"))
rsz("jsrq")=date()
rsz("hsrq")=date()+jieshu
rsz("jyadmin")=request.cookies("xtadminno")
rsz.update
rsz.close
set rsz=nothing
rs6("jieyue")=rs6("jieyue")+1
rs6.update
end if
rs6.close
set rs6=nothing
end if
rs7.close
set rs7=nothing
end if
%>
<%
if duzheno="" then
duzheno=""
else
set rs1=server.createobject("adodb.recordset")
sql1="select * from duzhe where duzheno='"&duzheno&"'"
rs1.open sql1,conn,1,1
if rs1.eof and rs1.bof then
response.write "查无此人!"
else
name=rs1("name")
sex=rs1("sex")
xi=rs1("xi")
banji=rs1("banji")
jieyue=rs1("jieyue")
zhibie=rs1("zhibie")
set rs2=server.createobject("adodb.recordset")
sql2="select * from jieyueshuliang"
rs2.open sql2,conn,1,1
if zhibie="学生" then
shuliang=rs2("xuesheng")
weijieyue=rs2("xuesheng")-jieyue
else
shuliang=rs2("jiaoshi")
weijieyue=rs2("jiaoshi")-jieyue
end if
rs2.close
set rs2=nothing
%>
这是qikanjieyue.asp网页中出现的判断语句代码.
拜托大家帮我改改呀!