inverti
if DateDiff("d",RecSet("Data_inserimento"),Date) <= 7 then