| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 546 人关注过本帖
标题:【求助】RS,CONN关闭
只看楼主 加入收藏
theend12
Rank: 2
来 自:ASP|PHP菜鸟
等 级:论坛游民
帖 子:83
专家分:42
注 册:2009-10-8
结帖率:72%
收藏
 问题点数:0 回复次数:3 
【求助】RS,CONN关闭
<!--#include file = "conn.asp"-->
<%
if session("admin")= "" Then   ' 判断登录状态
response.write "<script>alert('非法登陆 ');location.href='admin_login.asp'</script>"
end If
%>
<%
If request("send")=" 修改链接" Then
Dim h_id,h_name,h_url,h_info,h_qq,rs5,mysql5
id=request("id")
h_name=request("name")
h_url=request("url")
h_info=request("info")
h_qq=request("qq")
%>

<%
'=========================================================================
' 数据库操作:将用户信息录入到数据库
set rs5 = server.createobject("adodb.recordset")
mysql5 = "update [h_friend] set name = '"&h_name&"',url = '"&h_url&"',info = '"&h_info&"',qq = '"&h_qq&"'where ID = "&id
rs5.Open mysql5,conn,1,3
response.write "<script>alert("" 链接修改成!"");location.href=""admin_friend.asp"";</script>"
rs5.close
Set rs5 = Nothing
conn.close
Set conn=nothing
End If
%>

------------------------------------------ 以上是代码---------------------------------------------
执行后提示:
ADODB.Recordset (0x800A0E78)
对象关闭时,不允许操作。

关闭RS,CONN,挪了半天也不知道方在哪里,怎么都放在最后了还是不行呢?应该怎么放? 关闭RS和CONN要放哪?

搜索更多相关主题的帖子: CONN 
2010-06-16 16:16
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1214
专家分:1366
注 册:2005-3-14
收藏
得分:0 
因为你的更新语句中根没有用到rs5记录集,
没有打开,所以不存在关闭. 即可以去掉set rs5 = server.createobject("adodb.recordset")
再去掉
rs5.close
Set rs5 = Nothing

http://toorup.3v.do
loading...
2010-06-16 17:00
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
set rs5 = server.createobject("adodb.recordset")
mysql5 = "update [h_friend] set name = '"&h_name&"',url = '"&h_url&"',info = '"&h_info&"',qq = '"&h_qq&"'where ID = "&id
rs5.Open mysql5,conn,1,3
response.write "<script>alert("" 链接修改成!"");location.href=""admin_friend.asp"";</script>"
rs5.close
Set rs5 = Nothing
conn.close
Set conn=nothing
End If
Update要么用rs来Update要么直接用conn.execute,这种用法肯定错误,不知楼主看哪本书这样写的?
用法1
mysql5 = "update [h_friend] set name = '"&h_name&"',url = '"&h_url&"',info = '"&h_info&"',qq = '"&h_qq&"'where ID = "&id
conn.execute mysql5
response.write "<script>alert("" 链接修改成!"");location.href=""admin_friend.asp"";</script>"
conn.close
Set conn=nothing
End If
用法2
set rs5 = server.createobject("adodb.recordset")
mysql5 = "select * from [h_friend] where ID="&id
rs5.Open mysql5,conn,1,3
rs5("name")=h_name
rs5("url")=h_url
rs5("info")=h_info
rs5("qq")=h_qq
rs5.update
response.write "<script>alert("" 链接修改成!"");location.href=""admin_friend.asp"";</script>"
rs5.close
Set rs5 = Nothing
conn.close
Set conn=nothing
End If
2010-06-16 17:00
theend12
Rank: 2
来 自:ASP|PHP菜鸟
等 级:论坛游民
帖 子:83
专家分:42
注 册:2009-10-8
收藏
得分:0 
谢谢上面2位哥哥的回答了,我是自学的,刚刚学。解释的很详细。明白了

我是一个初学者.学每门知识都会经历一段菜鸟阶段,希望大家多帮忙
2010-06-16 17:18
快速回复:【求助】RS,CONN关闭
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024524 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved