Sql sætning med date() giver problemmer

Hvad er der galt?

<%
Set RS_News= Server.CreateObject("ADODB.RecordSet")
RS_News.open "Select * From [Nyheder] WHERE expires >= " & date() & " order by id desc", Conn
Do while not RS_News.EOF
%>

Den viser alle nyheder, også selv om de har "expired" i 2003.