发生错误: 对象关闭时,不允许操作。

lby221 2009-08-17 04:48:15
dim constr , rs ,conn , MD5

MD5 = File.MD5Hash
constr = "SELECT * from FILES WHERE Hash = '" & MD5 & "'"
set conn=Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.Recordset")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "data.mdb"

rs.open constr


With rs
if .bof and .eof then
.AddNew
.Fields("FileName") = File.FileName
.Fields("FileSize") = File.Size
.Fields("Hash") = MD5
.Fields("Tim") = now
.Update

else
Response.Write "KKK"
Response.End()
end if

总是提示 发生错误: 对象关闭时,不允许操作。
...全文
56 点赞 收藏 7
写回复
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
sumjor 2009-08-18
MD5 = File.MD5Hash
constr = "SELECT * from FILES WHERE Hash = '" & MD5 & "'"
set conn=Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.Recordset")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "data.mdb"

rs.open constr,conn,3,3
回复
chenjianyong94 2009-08-18

conn= "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("data.mdb")
rs.open constr,conn,3,3
回复
qwegis 2009-08-17
学习
回复
aemyang1987 2009-08-17
[Quote=引用 2 楼 mailbao 的回复:]
如果不行,將原code:
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "data.mdb"
rs.open constr

-------------------------
統一寫成如下方式 :

conn= "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("data.mdb")
rs.open constr,conn,3,3
[/Quote]
正解
回复
liuwei_IT_love 2009-08-17
楼上说的正确,你没有打开链接,把CONN这个参数加上就行了
回复
mailbao 2009-08-17
如果不行,將原code:
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "data.mdb"
rs.open constr

-------------------------
統一寫成如下方式 :

conn= "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("data.mdb")
rs.open constr,conn,3,3
回复
mailbao 2009-08-17
原來
rs.open constr
------------------------------
改成:
rs沒有打開數據庫連接conn
rs.open constr,conn,3,3
回复
发动态
发帖子
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
社区公告
暂无公告