Ho un campo del database che mi indica la scadenza di un account.

Vorrei che nella pagina in cui si verifica la correttezza di user e password venga anche controllato se l'account e' valido, facendo la differenza tra la data odierna e quella indicata nell'account come scadenza.

Se questa e' maggiore di 30 giorni tutto bene,
se minore di trenta giorni ma ancora valida mi compare solo un alert mentre se e' scaduta mi reinvia ad un'altra pagina.

Benche' ho cercato il modo di gestire le date non sono riuscito a fare quello che mi serve, ad esempio questo codice

dataAttuale=date()
dataScadenza=rsUtente.Fields.Item("scad")
diff=DateDiff("d",dataAttuale,dataScadenza)
if diff<0 then
Response.Redirect("Utente scaduto")
end if

mi da l'errore
Errore di run-time di Microsoft VBScript (0x800A01A8)
Necessario oggetto: 'DateTime'

La data presente nel database e' del tipo 13/06/2005

Grazie dell'aiuto
Luca