Visualizza solo lo scaduto

Questo semplice script filtro, visualizza solo le scadenze fino alla data odierna:

DataScadenza=Rdy.toDate(RowItem.CustomField(10))
 
If DataScadenza<=Now Then
 Response.Write("SHOW")
Else
 Response.Write("HIDE")
End If

Questo invece visualizza le scadenze fino alla data odierna (ma escludendo la data odierna):

DataScadenza=Rdy.toDate(RowItem.CustomField(10))
 
If DataScadenza<=(Now-1) Then
 Response.Write("SHOW")
Else
 Response.Write("HIDE")
End If