mach dir dein eigenes datumsformat wie z.b.
20020227 für den 27.02.2002
20020301
somit kannst du bequem abfraten erstellen
mit der abfrage wird´s allerdings a bisserl umständlich:
tag=Day(Date)
monat=Month(Date)
IF tag < 10 then tag = "0" & tag
IF monat < 10 then monat = "0" & monat
heute = year(Date) & monat & tag