您所在位置：主题：请帮助我找错误！！！！！
lovegtstone
[专家分：0] 发布于 2007-04-03 16:16:00
我是一个新手，按课本的输入程序就是实际不了。请各位高手帮忙看一看！！！！
<% option explicit %>
<html>
<head>
<title>显示数据库示例</title>
</head>
<h2 align="center">网络导航</h2>
<%
dim db
set db=server.CreateObject("ADODB.Connection")
db.open"dbq="&server.MapPath("wwwlink.mdb")&";Drive={Microsoft Access Driver(*.mdb)}"
dim strsql,rs
strsql="Select * from wwwlink order by link_id desc"
set rs=db.execute(strsql)
%>
<center>
<a href="6-2.asp">添加新记录</a>
<table border="1" width="90%">
<%
do while not rs.Eof
%>
<tr>
<td><%=rs("name")%></td>
<td><a href="http://<%=rs("URL")%>"target="new"><%=rs("URL")%></a></td>
<td><%=rs("into")%></td>
<td><a href="6-3.asp?link_id=<%=rs("link_id")%>">删除</td>
<td><a href="6-4.asp?link_id=<%=rs("link_id")%>">修改</td>
</tr>
<%
rs.movenext
loop
%>
</table>
</center>
</body>
</html>
出现如下错误：
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
/study/6-1.asp, 第 10 行
<% option explicit %>
<html>
<head>
<title>显示数据库示例</title>
</head>
<h2 align="center">网络导航</h2>
<%
dim db
set db=server.CreateObject("ADODB.Connection")
db.open"dbq="&server.MapPath("wwwlink.mdb")&";Drive={Microsoft Access Driver(*.mdb)}"
dim strsql,rs
strsql="Select * from wwwlink order by link_id desc"
set rs=db.execute(strsql)
%>
<center>
<a href="6-2.asp">添加新记录</a>
<table border="1" width="90%">
<%
do while not rs.Eof
%>
<tr>
<td><%=rs("name")%></td>
<td><a href="http://<%=rs("URL")%>"target="new"><%=rs("URL")%></a></td>
<td><%=rs("into")%></td>
<td><a href="6-3.asp?link_id=<%=rs("link_id")%>">删除</td>
<td><a href="6-4.asp?link_id=<%=rs("link_id")%>">修改</td>
</tr>
<%
rs.movenext
loop
%>
</table>
</center>
</body>
</html>
出现如下错误：
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
/study/6-1.asp, 第 10 行
