Tidsberegning/validering

Hejsa,

Jeg har lavet disse kommandoer, er de forkerte?

'Tjek om dato perioden passer
    strDato = Date()
    If strDato > objRec("Dato_Fra") and strDato < objRec("Dato_Til") then
    Response.Redirect "login.asp?cmd=ja&kreds=" & Request.form("kreds") & "&vagter=" & Request.form("vagter") & "&adgangskode=" & Request.form("adgangskode") & "&msg=Dato perioden passer ikke på kreds nr."
    End if
   
'Tjek om tids perioden passer
    strTid = Time()
    If strTid > objRec("Tid_Fra") and strTid < objRec("Tid_Til") then
    Response.Redirect "login.asp?cmd=ja&kreds=" & Request.form("kreds") & "&vagter=" & Request.form("vagter") & "&adgangskode=" & Request.form("adgangskode") & "&msg=Tidsrummet passer ikke på kreds nr."
    End if


Det er meningen at man IKKE skal kunne logge ind hvis datoen ikke er indenfor dato perioden og det samme gælder med tidsrummet...