可能比较菜的关于asp跟access数据库连接的问题，请赐教！(20分)

R

richboy2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #1

我在asp中键入如下代码：
<%
set conn=server.createobject("adodb.connection")
conn.open"driver={microsoft access driver(*.mdb)};dbq=" &amp;
server.mappath("sample.mdb")
set rs=conn.execute("成绩单")
%>
sample.mdb数据库"成绩单"数据表七栏的表头:<ul>
<%
for i=0 to 6
response.write"<li>" &amp;
rs(i).name
next
%>
<% rs.close %>
发布后提示：Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'
[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
请问按上面一段代码连接数据库怎么要用到odbc呢？？问题出在哪里？？百思不得
其解，请指教~！

 

X

xdf_hubei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #2

<%
on error resume next
dim conn
dim dbpath
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("/counter/counter.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" &amp;
DBPath

%>
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from total"
rs.open sql,conn,3,2
你看看这个吧，我曾经写的，没有问题，你把我这段程式读懂了就可以解决你的问题了

 

X

xdf_hubei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #3

这用的是ADO连接，是要ODBC的，只是这个连接是动态创建的，你在机器的ODBC数据源里看不到

 

R

richboy2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #4

既然是动态创建的，那应该是不用配odbc的，应该可以执行的。可为什么发布后显示
“[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
请问按上面一段代码连接数据库怎么要用到odbc呢？？”呢？？到底什么地方错了？》

 

M

microyzy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #5

conn.open"driver={microsoft access driver(*.mdb)};dbq=" &amp;
server.mappath("sample.mdb")
你把server.mappath("sample.mdb")打出来看看路径对不对就知道了

 

R

richboy2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #6

把server.mappath("sample.mdb")打出来看看路径对不对？？我比较菜，怎么看路径呀？？
我发布的asp在d:/study目录下，sample数据库也在该目录下，这样做对不？？

 

O

ourself

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #7

xdf_hubei's way is correct. I have used his code to set up a ASP page as below:
<%@ Language=VBScript %>
<%
dim conn
dim dbpath
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("dbdemos.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" + DBPath
newSQL="SELECT customer.CustNo, customer.Company FROM customer"
set rs=Server.CreateObject("ADODB.recordset")
rs.Open newSQL,conn,1,1
do until rs.EOF
response.write rs.Fields("company")+"<br>"
rs.MoveNext
loop
rs.close
%>

 

R

richboy2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-11

• #8

恩！xdf_hubei是对的，但我的那段代码看起来并没有什么问题呀，为什么不能用呢？？
能帮改改吗？

 

C

cjjlqq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-08

• #9

driver(*.mdb)};
driver和(*.mdb)之间好像有个空格，还有就是数据库路径了！

 

R

richboy2002

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-12

• #10

多人接受答案了。