ti do uno spunto, non ho provato la query ma dovrebbe andarbene.


codice:
dim DATAODIERNA AS DATE
DATAODIERNA=datevalue(NOW)

db.Execute "SELECT * FROM TABELLA where Scadenza_pagamento=#"& DATAODIERNA & "#)"