Visualizzazione dell'importo della scadenza solo se entro un certo campo di date

Questo script visualizza in una cella l'importo di una scadenza (positivo per le scadenze attive, negativo per le scadenze passive) solo se la scadenza e' scaduta da 90 giorni o piu'

Option Explicit
 
ImportoDare = Rdy.toDouble(RowItem.CustomField(50))
ImportoAvere = Rdy.toDouble(RowItem.CustomField(60))
ImportoPagato = Rdy.toDouble(RowItem.CustomField(70))
 
If ImportoDare>0 Then
 ImportoScadenza = ImportoDare-ImportoPagato
Else
 ImportoScadenza = -(ImportoAvere-ImportoPagato)
End If
 
DataScadenza = Rdy.toDate(RowItem.CustomField(10))
GiorniDifferenza = DateDiff("d",now, DataScadenza)
 
If GiorniDifferenza <= -90 Then
 Response.Write(Rdy.FormatCurrency(ImportoScadenza))
Else
 Response.Write("")
End If