日期:2014-05-17  浏览次数:20968 次

帮写一段最简单的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去查询数据,获得结果并显示