自制cd收纳包:asp程序不能连接ACCESS数据库

来源:百度文库 编辑:高校问答 时间:2024/03/29 13:50:15
提示:错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
我的连接代码是:set conn=server.createobject("adodb.connection")
conn.open("driver={Microsoft Access Driver(*.mdb)};dbq="&server.mappath("person.mdb"))
set rs=conn.Execute("SELECT *FROM grade")
有可能是ODBC设置有问题,可是我该试的都试过了,就是显示上面的错误提示,昨天晚上加班到12点,今天还没有搞出来,怎么办嘛,哪个哥哥用通俗的清晰的回答帮我,本人将倾囊相送25分,请不要复制网站或者论坛上的套话来应付,谢谢
大哥不行啊,我把你们的都试过了,还是显示哪个错误,我估计连接数据库的语句没有错,(conn.open 语句和set 语句)是不是ODBC设置有错误,还是系统那方面的设置有问题,急需

试试这个行不行,不行的话加我的QQ:94583908

<%
on error resume Next
Set Conn=Server.CreateObject("ADODB.Connection")
Set MyCmd=Server.CreateObject("ADODB.Command")
Conn.ConnectionTimeOut=20
Conn.CommandTimeOut=40
Conn.CursorLocation = 3
param="driver={Microsoft Access Driver (*.mdb)}"
dbname = server.mappath("数据库全名")

Conn.ConnectionString =param&";DBQ="&dbname&";"
Conn.Open
if Conn.state = 0 then
response.write "数据库连接失败,请稍候再试..."&err.Description
response.end
end if
Set MyCmd.ActiveConnection=Conn
Set Rs=Server.CreateObject("ADODB.RecordSet")
StrSql="select * from 任意一个表名"
rs.Open StrSql,Conn
if err<>0 then
Response.write "链路不通,请稍后再试. . . "&err.Description
Response.End
end if
rs.close
on error resume Next
%>

SELECT *FROM grade
*和FROM 之间要有空格,还是老兄的代码复制错了~做编程要严谨啊!

{Microsoft Access Driver 与(*.mdb)};之间有一个空格