Tjek dato

Jeg har denne lille smarte stump kode som tjekker for datoen for HotlineSlutSvar ikke er overskredet :

problemet er at den dato som jeg får tilbage via HotlineSlutSvar er den sidste dag som den skal være aktiv - men hvis HotlineSlutSvar er dagsdato så bliver strAktiv = Ikke Aktiv

er der nogen der kan rette denne stump kode så dagsdato osse er aktiv?

if isDate(HotlineSlutSvar) then
    If DateDiff("s", HotlineSlutSvar, Now) > 0 then
        strAktiv = "Ikke aktiv"
    else
        strAktiv = "Aktiv"
    end if
else
    strAktiv = "<i>(" + rsInfo + ")</i>"
end if