limitare accesso pagina per data e ora estratti da database

[marconi]

Salve a tutti ho un problemone da risolvee il rpima possibile:

Ho questo codice:
<%
Dim Data, Ora, MiaData, MiaOra
Data = date()
Ora = Time()
MiaData = DateSerial((countdown.Fields.Item("anno").Value),( countdown.Fields.Item("mese").Value),(countdown.Fi elds.Item("giorno").Value))
MiaOra = TimeSerial ((countdown.Fields.Item("ora").Value),(countdown.F ields.Item("minuti").Value),(countdown.Fields.Item ("secondi").Value))
If (Data <= MiaData)AND(Ora < MiaOra) Then
response.Write("Accesso Consentito")
Else
response.redirect ("user_home.asp")
End If
%>

Ora il problema è questo:
Se la data è passata lo script funziona e fa il redirect.
il problema è: se la data è uguale o inferiore, valida dunque per l'accesso, e l'ora del server è maggiore di quella inserita da me mi da il redirect perchè?
ESEMPIO PRATICO:
io ho inserito nel databse:
Mia data = 3/5/2008 cioè 3 maggio 2008
Mia ora = 2.39.0 cioè h2 m39 s0

Mettiamo il caso che oggi sia il 2/5/2008 e sono le ore 15.00, perchè mi da il redirect invece di farmi accedere, quello che voglio è che ad una certa data e ad una certa ora si chiudi l'accesso alla pagina, ovvio che i dati sono estratti da database....COSA DEVO FARE?

[Santino83_02]

fatti stampare le date, ovvero quella che ricavi col date e quella che ricavi dal dateserial, che magari sono in formati diversi. Poi magari MiaData confrontala con Cdate(MiaData)>Data. Insomma, che date (e che ore) stampa?