帮写一段最简单的ASP代码。 访问ACCESS解决方案

帮写一段最简单的ASP代码。 访问ACCESS
access数据库名： db1
表名: table1
字段： date number 
数据 2012-06-11 123
  2012-06-12 554
  2012-06-13 345

实现:

打开此页面时，自动按当前日期查找number，并显示出来即可。

比如今天是6-11，直接显示123即可。


谢谢。


[解决办法]
<%
t="2012-06-11"
set conn=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("db1.mdb")
connstr = "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
conn.Open connstr
sql="select number from table1 where [date] between #"& t &"#"
set rs=server.CREATEOBJECT("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "error"
else
response.write rs("number")
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
[解决办法]

VBScript code

    d = date()    d = year(d)&"-"&right( "0"&month(d), 2)&"-"&right( "0"&day(d), 2)        sql = "select number from table1 where date = '"&d&"'"    response.write sql
[解决办法]
access的日期好像是#号作为边界的。

楼主，只要联通access的连接，就可以。
[解决办法]
select number from table1 where datediff("d",now(),date) = 0

用这句sql去查询数据，获得结果并显示