Allora prova così:
codice:
DataOggi = Replace(Date(), ".", "/")
Sql = "SELECT * FROM Feste WHERE DataFesta >= #" & DataOggi & "# ORDER BY DataFesta"