卡特兔是哪里的品牌:对象关闭时,不允许操作

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/03 21:43:57
<%
if post="del" and name="txt" then
set rsdel=server.createobject("adodb.recordset")
rsdel.open "select * from product where id = "&id&" ",conn,1,3
if rsdel.Eof or rsdel.Bof then
Response.Write("<script>alert(' 黑客同志!请不要非法操作!很容易死机的!');window.location=('admin_product.asp')</script>")
Response.End
Else
rsdel.close:set rsdel=nothing
set rsdel=server.createobject("adodb.recordset")
rsdel.open"DELETE FROM product WHERE id = "&id&" ",conn,1,3
Response.Write("<script>alert('删除成功!');window.location=('admin_product.asp')</script>")
rsdel.close:set rsdel=nothing //提示错误行
End if
End if
%>
把出错行删了就可以,但这样没关数据库

这说明你这段代码后面还有调用rsdel这个记录集的代码。检查一下吧,要么在这段代码后面重新打开rsdel记录集,要么就把后面调用记录集的代码放到rsdel.close:set rsdel=nothing前面来。

<%
if post="del" and name="txt" then
set rsdel=server.createobject("adodb.recordset")
rsdel.open "select * from product where id = "&id&" ",conn,1,3
if rsdel.Eof or rsdel.Bof then
Response.Write("<script>alert(' 黑客同志!请不要非法操作!很容易死机的!');window.location=('admin_product.asp')</script>")
Response.End
Else
rsdel.close:set rsdel=nothing
set rsdel=server.createobject("adodb.recordset")
rsdel.open"DELETE FROM product WHERE id = "&id&" ",conn,1,3
Response.Write("<script>alert('删除成功!');window.location=('admin_product.asp')</script>")
rsdel.close:set rsdel=nothing //提示错误行
End if
End if
rsdel.close
conn.close
%>
也可以这样
rsdel.close
set rsdel=nothing
conn.close
set conn=nothing
nothing 写成了‘’了学的语言太多了,晕死了