Finner ikke feilen...

Kan noen hjelpe meg med å finne feilen/ foreslå en løsning. Scriptet skal kun vise dagens + kommende konserter fra en database som inneholder alle konsertene som er spilt og skal spilles.
Feilmeldingen er
Microsoft OLE DB Provider for ODBC Drivers error \'80040e07\'
[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.
/webmaster/newconcerts_test.asp, line 18


Her er scriptet. Linje 18 er markert med en asp-kommentar

<%
dddDate=date()
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"Driver={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"allconcerts.mdb\")

\'Hent nye koncerter
\'HER ER LINJE 18
set rs = conn.execute(\"Select * from concerts where concertdate>= \'\" & dddDate & \"\'\")

    \'TABELL
    Response.write \"<tr><td colspan=\'8\'>&nbsp;</td></tr>\"
    Response.write \"\"
    Response.write \"<td>Concertdate:</td>\"
    Response.write \"<td><B>City:</B></td>\"
    Response.write \"<td><B>Location:</B></td>\"
    Response.write \"<td>Info:</td>\"
    Response.write \"<td>Related links:</td>\"
    Response.write \"<td>Reviews:</td>\"
    Response.write \"<td>Playlists:</td>\"
    Response.write \"</tr><td>&nbsp;</td>\"
    tt = ff2b
    do while not rs.eof
    \'LAGER MELLOMROM TIL BREAKS
    playlists = Replace(rs(\"playlist\"), vbCrLf, \"<BR>\")
    Response.write \"<tr>\"
    Response.write \"<td>\" & rs(\"concertdate\")                & \"</td>\"
    Response.write \"<td>\" & rs(\"city\")            & \"</td>\"
    Response.write \"<td>\" & rs(\"location\")            & \"</td>\"
    Response.write \"<td>\" & rs(\"info\")            & \"</td>\"
    Response.write \"<td>\" & rs(\"weblink\")            & \"</td>\"
    Response.write \"<td>\" & rs(\"reviews\")            & \"</td>\"
    Response.write \"<td>\" & playlist    & \"</td>\"
    Response.write \"</tr>\"
    rs.movenext
    loop

%>