Esempio
Visualizzazione dei giorni di ritardo sull'incasso delle scadenze scadute
Option Explicit
Dim GiorniRitardo
GiorniRitardo=0
If DueDate.DateDue<Rdy.Today() Then
GiorniRitardo=DateDiff("d",DueDate.DateDue,Rdy.Today())
End If
If GiorniRitardo>0 Then
Response.Write(GiorniRitardo)
End If