帮我看看ASP源码错误的地方

[lkjlnet]

我编了一个index.asp,源码如下：

<%
set conn=server.CreateObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("data/nod32.mdb")
%>
<%
Dim MyDate
exec="select * from id where data='"&date()&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open exec,conn,1,1
%>
<%do while not rs.eof%>
<%=rs("yhm")%><br>
<%=rs("mima")%><br>
<%=rs("date")%><br>
<%
rs.movenext
loop
%>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

运行时出现错误：
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC 驱动程序不支持所需的属性。
/index.asp, 第 9 行

[fzfei2]

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source="server.MapPath("data/nod32.mdb") 改用这试试

• 打赏
• 举报

回复 赞

[lkjlnet]

引用 1 楼 fzfei2 的回复:

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source="server.MapPath("data/nod32.mdb") 改用这试试

按你的方法，出现新的问题： 错误类型： Microsoft VBScript 编译器错误 (0x800A0401) 语句未结束 /index.asp, line 3, column 57 conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="server.MapPath("data/nod32.mdb")

• 打赏
• 举报

回复 赞

[ChinaXtHuLang]

少了个：& "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("data/nod32.mdb") 试试

• 打赏
• 举报

回复 赞

[lkjlnet]

引用 3 楼 ChinaXtHuLang 的回复:

少了个：& "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("data/nod32.mdb") 试试

不行，出现这个问题： 错误类型： Microsoft JET Database Engine (0x80040E10) 至少一个参数没有被指定值。 /index.asp, 第 9 行

• 打赏
• 举报

回复 赞

[ChinaXtHuLang]

select * from id where data='2013-2-4' 这个。你拿到数据库中执行下。看提示什么。。你的这个SQL语句应该有问题。

• 打赏
• 举报

回复 赞

[GoCityPass新加坡曼谷通票]

exec="select * from id where data='"&date()&"'" 表名称不正确或者字段名称不正确，自己检查下

• 打赏
• 举报

回复 赞

[ChinaXtHuLang]

select * from [id] where data='2013-2-4'

• 打赏
• 举报

回复 赞