condizione a seconda della data

[longline]

Non fare eseguire la select. Cosa viene visualizzato a schermo?

DataOggi = CDate(Replace(CStr(Date()), ".", "/"))
Sql = "SELECT * FROM Feste WHERE DataFesta >= #" & DataOggi & "# ORDER BY DataFesta"
Response.Write DataOggi
Response.Write "
"
Response.Write Sql