codice:
<%
'controllo del giorno e del mese. Se è minore di 10 metto lo 0 davanti.
ctrlGG=request("GIORNO")
if ctrlGG<10 then
GIORNO=0&ctrlGG
else
GIORNO=ctrlGG
end if
ctrlMM=request("MESE")
if ctrlMM<10 then
MESE=0&ctrlMM
else
MESE=ctrlMM
end if
dataScelta=GIORNO&"/"&MESE&"/"&request("ANNO")
dataScelta=FormatDateTime (dataScelta, vbShortDate)
dataOggi=formatDateTime (date, vbShortDate)
if ((dataScelta=dataOggi) and (ORA>formatDateTime(time, vbShortTime))) or (dataScelta>dataOggi) then
if ORA="23:30" then
testo="Sono passate le 23!"
else
testo="Ok!"
end if
else
testo="Troppo tardi!"
end if
%>
ovviamente ORA lo prende dal db...