ASP报错 ADODB.Recordset '800a0e78' 对象关闭时，不允许操作。

答案:2 悬赏:50 手机版

解决时间 2021-03-19 01:40

提问者网友：愿为果
2021-03-18 20:29

带#号的那行出错 <%if session("admin")="" then response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='login.asp';</script>" response.End else if session("flag")>2 then response.Write "您没有此项目管理权限！" response.End end if end if selectbookid=trim(request("selectdel")) set u=conn.execute("select * from admin_user where admin ='"&session("admin")&"'") if selectbookid<>"" then conn.execute "delete from money_list where id in ("&selectbookid&")" response.Redirect("get_money.asp") response.End end if action=trim(request("site")) if action = "未处理" then conn.execute("update money_list set site = '未处理' where id="&trim(request("id"))) elseif action = "已经处理" then set rs1=conn.execute("select * from money_list where id ="&trim(request("id"))) if rs1("site") <> "已经处理" then conn.execute("update money_list set site = '已经处理' where id="&trim(request("id"))) conn.execute("update money_list set set_time = now() where id="&trim(request("id"))) set rs=server.CreateObject("adodb.recordset") sql="select * from money_list where id ="&trim(request("id")) rs.open sql,conn,2,3 rs("chuliren")=u("admin") rs.update end if end if %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <link rel="stylesheet" href="manage.css" type="text/css"> <script type="text/JavaScript">  </script> </head> <BODY background="../images/admin/back.gif"> <% dim namekey,checkbox,action,money_id,user_name,add_time1,add_time2,site action=request.QueryString("action") checkbox=request("checkbox") namekey=request("namekey") money_id=request("money_id") user_name=request("user_name") add_time1=request("add_time1") add_time2=request("add_time2") site=request("site") if InStr(namekey,"'")>0 then response.write"<script>alert(""非法访问!"");location.href=""../index.asp"";</script>" response.end end if if namekey="" then namekey=request("namekey") if checkbox="" then checkbox=request("checkbox") id =trim(request("id")) if id ="" then id=0 end if set rs=server.CreateObject("adodb.recordset") if money_id = "" and user_name = "" and add_time1 = "" and add_time2 = "" and site = "" then rs.open "select * from money_list where money_type = 2",conn,3,1 end if if rs.eof And rs.bof then #################### Response.Write " "&namekey&" 无此信息，请点击<a href='get_money.asp'>返回</a>重新搜索！ " end if %> 问题如果解决了，还可追加

最佳答案

五星知识达人网友：旧脸谱
2021-03-18 21:18

if money_id = "" and user_name = "" and add_time1 = "" and add_time2 = "" and site = "" then
rs.open "select * from money_list where money_type = 2",conn,3,1
end if

出错可能是没有满足条件吧 rs.open没有执行，当然就报错了

全部回答

1楼网友：北城痞子
2021-03-18 21:23

你的错误是对象关闭后不能接着执行必须再.open(）才能执行以后的操作。看你的程序：例如你的rsp.open()后，的确执行过一次rsp.close 但是你再执行下面的时候没有再打开rsp.open(),所以会报“对象关闭时，不允许操作” 不知道你明白没有？就是说执行完.open操作，要执行.close操作。执行完.close操作后，要及时再执行.open操作才能执行下面的操作。也不知道你听明白没！！！

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息