28,406
社区成员
发帖
与我相关
我的任务
分享这段代码何处错了啊.
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<%
dim db
set db=server.CreateObject("adodb.connection")
db.open"dbq="&server.MapPath("dataxin.mdb")&";driver={microsoft access driver(*.mdb)}"
dim strsql,rs
strsql="select * from xinwen"
set rs=db.execute(strsql)
%>
<table border="1">
<%
if not rs.eof then
dim i
for i=1 to 5
%>
<tr>
<td><%=rs("newtitle")%></td>
<td><%=rs("newdate")%></td>
</tr>
<%
next
end if
db.close
%>
</body>
</html>
技术信息（用于支持人员）
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
/index.asp, 第 12 行
<title>无标题文档</title>
</head>
<body>
<%
dim db
set db=server.CreateObject("adodb.connection")
db.open"dbq="&server.MapPath("dataxin.mdb")&";driver={microsoft access driver(*.mdb)}"
dim strsql,rs
strsql="select * from xinwen"
set rs=db.execute(strsql)
%>
<table border="1">
<%
if not rs.eof then
dim i
for i=1 to 5
%>
<tr>
<td><%=rs("newtitle")%></td>
<td><%=rs("newdate")%></td>
</tr>
<%
next
end if
db.close
%>
</body>
</html>
技术信息（用于支持人员）
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
/index.asp, 第 12 行
...全文
请发表友善的回复…
发表回复
挨踢直男 2009-11-30
- 打赏
- 举报
Strsql = "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("dataxin.mdb")
set db=server.createobject("ADODB.CONNECTION")
db.open Strsql
set db=server.createobject("ADODB.CONNECTION")
db.open Strsql
asdfasdfdfas 2009-11-30
- 打赏
- 举报
db.open"dbq="&server.MapPath("dataxin.mdb")&";driver={microsoft access driver(*.mdb)}"
