在线等待，求救！asp连接access的问题！

[ChinaChargin]

我的asp突然连接不到access了，昨天还好好的，今天突然不行，请问大家asp连接access的驱动文件是什么，为什么会突然这样！
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
/book/setup.asp, 第 10 行


浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)

页：
GET /Gbook/index.asp

时间：
2003年11月5日, 15:08:00


详细信息：
Microsoft 支持

[nchen123]

用这个：

<%
dim strConn
dim conn

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("itgdb.mdb")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open(strConn)
%>

[chense]

把你的代码贴出来！

[sdliubo]

<%
Dim mconn
Dim connstr
Set mConn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("ztest.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};Pwd=999;"
mConn.Open connstr
%>

[ChinaChargin]

DBPath = Server.MapPath("data/book.mdb")
Connstr = "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set conn = Server.CreateObject("ADODB.Connection")
Conn.open Connstr

[ChinaChargin]

上楼是我的连接代码吗，我现在用了
<%
dim strConn
dim conn

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("itgdb.mdb")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open(strConn)
%>
可是提示
Microsoft JET Database Engine (0x80004005)

[ChinaChargin]

不行啊，大哥们，还是提示连不上啊，是不是我的系统出现问题了，到底怎么决解啊，！

[mflove]

第一种:
<%
dim conn
dim connstr
on error resume next
set conn=server.createobject("ADODB.CONNECTION")

connstr="DBQ="+server.mappath("lisroa/lisroa.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
conn.open connstr
%>
第二种:
<%
dim conn
dim connstr
on error resume next
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("lisroa/lisroa.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
%>

一个是连接高版本的数据库，别一个是连接低版本的数据库。

[xiejunhua]

按楼上的连接决对没问题的.