Sortering efter dato igen igen..

Ok, jeg vil lige prøve med et kendt spørgsmål, da jeg ikke har fundet noget svar der har virket endnu :-)
--------------

Jeg skal have trukket ud og sorteret noget data fra en database (MS Acces), men jeg kan ikke få det til at virke.
Dataen skal sorteres efter dato, plus at de datoer som er overskredet ikke må vises. Jeg har klaret det med de overskredne, og min kode ser nu sådan ud:

--------------
strSQL = "Select * from tblProgram where dato >= #" & Date() & "#  order by dato"
--------------

Som sagt smider den de overskredne over, men det er som om den ikke gør noget med datoen..? Jeg har sat feltet i databasen som at være af typen Short Date.. det burde da gøre det? har også prøvet med ASC og DESC, men ingen ændringer?

På forhånd tak
  Jeppe B. Madsen