为什么会有这样的错误“对象关闭时,不允许操作”
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!--#include file="../config/db.asp"--><!--#include file="../config/function.inc.asp"--><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><title>无标题文档</title></head><body><%'on error resume nextdim rs,sqlif request.QueryString("act")="update" thenif isnumeric(request.QueryString("id")) and not isempty(request.QueryString("id")) thenif request.Form("f_code")="" thenmsgboxu"密码不能未空"elsesql="update tbl_user set u_code='"&request.Form("f_code")&"',u_name='"&request.Form("f_name")&"',u_sex='"&request.Form("f_sex")&"',u_tel='"&request.Form("f_tel")&"' where u_id="&request.QueryString("id")conn.execute sqlset myErrors=conn.errorsif myErrors.count=0 thenmsgboxU "修改成功!"elsemsgboxU "修改失败!原因:"&myErrors.item(0).descriptionend ifend ifelsemsgboxu "非法参数"end ifend ifset rs= Server.CreateObject("adodb.recordset")if request.QueryString("act")="modify" thenif isnumeric(request.QueryString("id")) and request.QueryString("id")<>0 thensql=" select * from tbl_user where u_id="& request.QueryString("id")rs.open sql,conn,1,1if rs.bof and rs.eof thenmsgboxu "可能是参数错误!"else%><form id="form1" name="form1" method="post" action="admin_user_modify.asp?act=update&id=<%= request.QueryString("id") %>"><table width="513" border="1" align="center"><tr><td colspan="3">用户管理--用户资料修改</td></tr><tr><td width="63">用户名</td><td width="364"><%= rs("u_user") %></td><td width="64"> </td></tr><tr><td>密 码</td><td><input name="f_code" type="text" id="f_code" value="<%= rs("u_code") %>" /></td><td> </td></tr><tr><td>姓 名</td><td><input name="f_name" type="text" id="f_name" value="<%= rs("u_name") %>" /></td><td> </td></tr><tr>
参考答案:<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
这里是关闭对象的