Find en fejl i SQL

Hejsa

jeg får denne fejl meddelse
Microsoft JET Database Engine error '80040e07'

Data type mismatch in criteria expression.

//global.asa, line 64

kode.:
SQL = "Update tblProdukter set "
            SQL = SQL & "Dato_til='0', "
            SQL = SQL & "Dato_fra='0', "
            SQL = SQL & "Tilbud='0' "
            SQL = SQL & "where Dato_til = " & Clng(fildato) -1
Conn2.execute(SQL)
            Conn2.close
            Set Conn2 = Nothing

--
jeg kan simpelhen ikke finde fejlen....