ASP关于时间大小的比较问题

Question

上面是从ACCESS数据库读取出来的日期记录，现在我想判断这些日期里的时间相对于同一天在7：00到9：00的在日期后面加个“正常”
这个日期字段是rs("checktime")

Answer 1

Dim D1,D2
'以每日的7:00:00为判断时间
D1=Year(rs("checktime"))&"-"&Month(rs("checktime"))&"-"&Day(rs("checktime"))&" 7:00:00"
'返回时间差的秒数,负数表示早于D1时间,正数表示晚于D1时间.
D2=Datediff("s",D1,rs("checktime")) 
Response.Write rs("checktime")
'0表示刚好是7:00:00,如大于7200,则表示当日时间已是9:00:01以后
If D2<0 or D2>7200 Then
    Response.Write "未在规定时间内签到!"
Else
    Response.Write "正常"
End If

好了,你可以采纳了.