帮小弟我看看ASP源码异常的地方

帮我看看ASP源码错误的地方
我编了一个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 行
------解决方案--------------------------------------------------------
少了个：&
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("data/nod32.mdb")

试试
------解决方案--------------------------------------------------------
select * from id where data='2013-2-4'

这个。你拿到数据库中执行下。看提示什么。。你的这个SQL语句应该有问题。
------解决方案--------------------------------------------------------
exec="select * from id where data='"&date()&"'"

表名称不正确或者字段名称不正确，自己检查下
------解决方案--------------------------------------------------------
select * from [id] where data='2013-2-4'