'以每日的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
好了,妳可以采納了.