请教ASP如何连接Access2010的accdb数据库,万分谢谢!

时间:2022-09-07 20:16:45
请教ASP如何连接Access2010的accdb数据库,万分谢谢!

<%
Dim Conn,ConnStr
Set Conn=Server.CreateObject("Adodb.Connection")
ConnStr="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Server.MapPath("test2010.accdb")
Conn.Open ConnStr
Set rs = Conn.Execute("select * from testdb1")
Response.Write rs.EOF
Conn.Close

%>

我试过了这段代码,提示:
ADODB.Connection 错误 '800a0e7a' 

未找到提供程序。该程序可能未正确安装。 


请高手帮忙,谢谢!

21 个解决方案

#1


Provider=Microsoft.Jet.OLEDB.4.0;Data Source=a.mdb

#2


不是 .mdb  而是 .accdb 

#3


[code=SQL]----明显的提示驱动程序是不对的
<%
dim conn,connStr
set conn=server.createobject("adodb.connection")
connStr="provider=micorosoft.jet.OLEDB;Data source="&server.mapPath("test2010.mdb")
conn.open connStr
set rs=conn.Execute("select * from testdb1")
response.write rs.Eof
conn.close
set rs=nothing
%>
[/code]

#4


<%
dim conn,connStr
set conn=server.createobject("adodb.connection")
connStr="provider=micorosoft.jet.OLEDB;Data source="&server.mapPath("test2010.mdb")
conn.open connStr
set rs=conn.Execute("select * from testdb1")
response.write rs.Eof
conn.close
set rs=nothing
%>

#5


驱动程序的问题呀!检查驱动程序

#6


重新安装一下access2010

#7


晕死。楼上的朋友,你没有看清我的题目啊!

Access2010 不是 mdb 文件呀! 是accdb 文件!

#8


以下为VB代码,供参考:

Dim myconn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim str
str = App.Path
If Right(str, 1) <> "\" Then
str = str + "\"
End If
str = "Provider=Microsoft.ACE.OLEDB.12.0;Persist Security Info=False;Data Source=" & str & "kcdb.accdb"
myconn.Open str
myconn.CursorLocation = adUseClient


另外:accdb是Access2007的格式,2010好象在开发时不能读,必须安装2007----我没用过,不清楚哈,LZ自行测试。

#9


这里有篇文章,你看一下:http://office.microsoft.com/zh-cn/access-help/HA010067831.aspx

#10


你试试这个:

<%
dim conn,db
dim connstr
db="qyData/glgk2007.asp" '数据库文件位置
on error resume next
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.accdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if
sub CloseConn()
 conn.close
 set conn=nothing
end sub
%>

#11


<%


DB="数据库路径"
set conn=server.createobject("adodb.connection")
myconn="provider=microsoft.jet.oledb.4.0;data source="+server.mapPath(DB)
conn.open myconn
set Rs=server.createobject("adodb.recordset")
%>

#12


好的,我来试试各位的

#13



Microsoft JET Database Engine

 错误 '80004005' 

不可识别的数据库格式 'E:\dbfile\dbbook.accdb'。 

/dbfile/dbconn.asp,行 9 


试了第11楼的,不行哦!

#14


conString = "Provider=Microsoft.ACE.OLEDB.12.0;Data source=C:\\Documents and Settings\\Administrator\\My Documents\\AccessDB\\AIS_.mdb;Persist Security Info=False;";
我之前连过2007,2007里面也可以用.MDB的数据库,我这样连是可以的

#15


10楼的也是, 不可识别的数据库格式!

#16


To: 第14楼,

我说的我的不是mdb 数据库, 是Access2010里的 accdb 数据库。 

我试了以上所有的方法,都不行!

#17


坐等他人吧

#18


connstr="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="c:\abc.accdb";Persist Security Info=False"

给分吧~!

#19


现在虚拟空间都支持2010了? 我凹凸了

#20


需要先安装微软的Microsoft.ACE.OLEDB.12.0数据引擎,下载地址:http://www.microsoft.com/downloads/details.aspx?familyid=7554F536-8C28-4598-9B72-EF94E038C891&displaylang=zh-cn

#21


刚才那个是2007的地址,2010的地址如下:http://www.microsoft.com/downloads/zh-cn/details.aspx?FamilyID=C06B8369-60DD-4B64-A44B-84B371EDE16D

#1


Provider=Microsoft.Jet.OLEDB.4.0;Data Source=a.mdb

#2


不是 .mdb  而是 .accdb 

#3


[code=SQL]----明显的提示驱动程序是不对的
<%
dim conn,connStr
set conn=server.createobject("adodb.connection")
connStr="provider=micorosoft.jet.OLEDB;Data source="&server.mapPath("test2010.mdb")
conn.open connStr
set rs=conn.Execute("select * from testdb1")
response.write rs.Eof
conn.close
set rs=nothing
%>
[/code]

#4


<%
dim conn,connStr
set conn=server.createobject("adodb.connection")
connStr="provider=micorosoft.jet.OLEDB;Data source="&server.mapPath("test2010.mdb")
conn.open connStr
set rs=conn.Execute("select * from testdb1")
response.write rs.Eof
conn.close
set rs=nothing
%>

#5


驱动程序的问题呀!检查驱动程序

#6


重新安装一下access2010

#7


晕死。楼上的朋友,你没有看清我的题目啊!

Access2010 不是 mdb 文件呀! 是accdb 文件!

#8


以下为VB代码,供参考:

Dim myconn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim str
str = App.Path
If Right(str, 1) <> "\" Then
str = str + "\"
End If
str = "Provider=Microsoft.ACE.OLEDB.12.0;Persist Security Info=False;Data Source=" & str & "kcdb.accdb"
myconn.Open str
myconn.CursorLocation = adUseClient


另外:accdb是Access2007的格式,2010好象在开发时不能读,必须安装2007----我没用过,不清楚哈,LZ自行测试。

#9


这里有篇文章,你看一下:http://office.microsoft.com/zh-cn/access-help/HA010067831.aspx

#10


你试试这个:

<%
dim conn,db
dim connstr
db="qyData/glgk2007.asp" '数据库文件位置
on error resume next
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.accdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if
sub CloseConn()
 conn.close
 set conn=nothing
end sub
%>

#11


<%


DB="数据库路径"
set conn=server.createobject("adodb.connection")
myconn="provider=microsoft.jet.oledb.4.0;data source="+server.mapPath(DB)
conn.open myconn
set Rs=server.createobject("adodb.recordset")
%>

#12


好的,我来试试各位的

#13



Microsoft JET Database Engine

 错误 '80004005' 

不可识别的数据库格式 'E:\dbfile\dbbook.accdb'。 

/dbfile/dbconn.asp,行 9 


试了第11楼的,不行哦!

#14


conString = "Provider=Microsoft.ACE.OLEDB.12.0;Data source=C:\\Documents and Settings\\Administrator\\My Documents\\AccessDB\\AIS_.mdb;Persist Security Info=False;";
我之前连过2007,2007里面也可以用.MDB的数据库,我这样连是可以的

#15


10楼的也是, 不可识别的数据库格式!

#16


To: 第14楼,

我说的我的不是mdb 数据库, 是Access2010里的 accdb 数据库。 

我试了以上所有的方法,都不行!

#17


坐等他人吧

#18


connstr="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="c:\abc.accdb";Persist Security Info=False"

给分吧~!

#19


现在虚拟空间都支持2010了? 我凹凸了

#20


需要先安装微软的Microsoft.ACE.OLEDB.12.0数据引擎,下载地址:http://www.microsoft.com/downloads/details.aspx?familyid=7554F536-8C28-4598-9B72-EF94E038C891&displaylang=zh-cn

#21


刚才那个是2007的地址,2010的地址如下:http://www.microsoft.com/downloads/zh-cn/details.aspx?FamilyID=C06B8369-60DD-4B64-A44B-84B371EDE16D