<% dim TT,s,t_day,dd,mm
s=trim(request("usernow"))
if len(s)<6 then
TT=cstr(now)
else
TT=s
end if
't_day=datevalue(TT)
dd=trim(cstr(day(tt)))
mm=cstr(month(tt))
Set conn = Server.CreateObject("ADODB.Connection")
dbpath=Server.MapPath("syq.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs=server.CreateObject ("ADODB.Recordset")
sql="select 年月日时分,日降水量,报汛站码 from ST_RNFL_R r WHERE day(年月日时分)='
dd' and DATEPART('h',年月日时分)=
8 and month(年月日时分)='7' "
<a href="sssq1.asp?usernow=<% =cstr(dateadd("d",-1,TT)) %>">前一天</a> <a href="sssq1.asp?usernow=<% =cstr(dateadd("d",1,TT)) %>">后一天</a>
现在有2个问题：1是页面刷新后显示的日期是上次翻页后的日前 ，我想刷新后就是now
2是在数据库查询中如如果用表示日期的dd怎么不能显示，直接用28九可以显示 不知道什么原因？
