Datokoks: Er X dato ældre end dags dato?

Jeg har noget af svaret her:

<%
Dim EventDato
EventDato = "20/09/2006"
response.write "Idag: " & Date & "<br>"
response.write "EventDato: " & EventDato & "<br>"
response.write "Difference: " & (DateDiff("d",Date,EventDato)) & "<br>"
%>

Dette spytter et negativt tal ud. Så jeg skal jeg bare finde ud af om en værdi er negativ eller positiv. Hvordan gør man det?

Fandt selv svaret: Funktionen hedder Sgn(x).
Prøv selv:

<%
Dim EventDato
EventDato = "24/12/2006"
response.write "Idag: " & Date & "<br>"
response.write "EventDato: " & EventDato & "<br>"
ValueInDays = (DateDiff("d",Date,EventDato))
response.Write "DateDiff returnerer: " & ValueInDays & "<br><br><br>"

if Sgn(ValueInDays) = - 1 then
Response.Write "EventDato er ældre end dagsdato"
else if Sgn(ValueInDays) = 1 then
Response.Write "EventDato er nyere end dagsdato"
else if Sgn(ValueInDays) = 0 then
Response.Write "EventDato er den samme som dags dato"
end if
end if
end if
%>

Fuck jeg ælsker Goole :-)

kunne du ikke også bare lave en

if ValueInDays < 0 then 'minus
if ValueInDays > 0 then 'plus
if ValueInDays = 0 then 'ingen

?
Eller giver det mon fejl?