初学者的问题：连接数据库出错

[hawk777]

连接数据库报错，请帮我看看
<%
dim conn,connstr
conn=server.CreateObject("adodb.connection")
connstr="dbq="&Server.MapPath("book.mdb")&";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)}"
conn.open connstr
%>

错误提示是：
错误类型：
Microsoft VBScript 运行时错误 (0x800A01A8)
/webstar/dd/guestbook/conn.asp, 第 5 行

[hawk777]

我不明白错到哪了，能不能给我指明，谢谢了！

[aspnetxp]

up...

[swich]

http://www.connectionstrings.com/

[bybee]

databasename="/hezuo/kids/database/data.mdb"
set connect=server.CreateObject("ADODB.connection")
strconn="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &_
server.MapPath(databasename)
connect.Open strconn

你试试

[bybee]

databasename="/hezuo/kids/database/data.mdb"是绝对路径，也可以用相对路径

[pionny]

<%
Set conn= Server.CreateObject("ADODB.Connection")
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
Path = "Data Source=" & Server.MapPath("book.mdb")
p1=Provider&Path
conn.Open P1
%>

[nbpeter]

dim rs
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("book.mdb")
set rs= server.createobject("adodb.recordset")

[lonelydreamsym]

新建一个文本文件，然后将文件扩展名改为　udl,之后双击，你选择一下，然后选择一下数据库，最后有个测试连接，测试成功后再将扩展名改为　txt,拷出里面的连接代码就行了。(*.udl是数据库连接文件)