帮忙看看access的连接错误阿!急阿

Maggiew 2003-08-19 10:08:40
asp文件全文:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Set Cnn = Server.CreateObject("ADODB.connection")
set rs=Server.Createobject("ADODB.Recordset")
CnnStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("result.mdb")
response.Write(CnnStr)
Cnn.open CnnStr
rs.open "Select * From record"
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>

</body>
</html>
错误:
Error Type:
ADODB.Recordset (0x800A0E7D)
The connection cannot be used to perform this operation. It is either closed or invalid in this context.

如果没有rs.open "Select * From record"
网页就不会报错
似乎也不会是数据库的问题,因为我曾经把数据库放在别的地方,或是用别的数据库测试都是这样的错误。
大家帮我看看可能的原因吧。谢谢啦
...全文
29 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
aBoris 2003-08-19
  • 打赏
  • 举报
回复
<%
Dim conn
Dim connstr
connstr = "DBQ=" + server.mappath("result.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err.number<>0 then
err.clear
set conn=nothing
response.write "数据库连接出错!"
Response.End
else
conn.open connstr
if err then
err.clear
set conn=nothing
response.write "数据库连接出错!"
Response.End
else
rs.open "Select * From record",conn,1,1
end if
end if

%>
lhc521 2003-08-19
  • 打赏
  • 举报
回复
我想你用以下的方法可能能连接上啊
Set Myconn=Server.CreateObject("ADODB.Connection")
Myconn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath("result.mdb")
set rs=server.createobject("adodb.recordset")
sql="select * from record "
rs.open sql ,Myconn
zhengbenben 2003-08-19
  • 打赏
  • 举报
回复
<%
Set Cnn = Server.CreateObject("ADODB.connection")
CnnStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("result.mdb")
Cnn.open CnnStr
set rs=Server.Createobject("ADODB.Recordset")
Sql = "Select * From record"
Rs.open sql,cnn,1,1

%>
业余程序员 2003-08-19
  • 打赏
  • 举报
回复
快点接贴不行的话QQ:55653793
业余程序员 2003-08-19
  • 打赏
  • 举报
回复
set con=server.createobject("ADODB.CONNECTION")
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("mail.mdb")
con.open connstr
set otb=con.execute("select * from mail")
diya 2003-08-19
  • 打赏
  • 举报
回复
<%
Set Cnn = Server.CreateObject("ADODB.connection")
CnnStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("result.mdb")
Cnn.open CnnStr
set rs=Server.Createobject("ADODB.Recordset")
rs.open "Select * From record" ,cnn,1,1
%>
Maggiew 2003-08-19
  • 打赏
  • 举报
回复
不行啊,另外后面的参数是什么意思啊?
liwan123 2003-08-19
  • 打赏
  • 举报
回复
rs.open "Select * From record",cnn,1,3
diya 2003-08-19
  • 打赏
  • 举报
回复
rs.open "Select * From record",cnn,3,1

28,390

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧