How to resolve error in MS Access - VBA SQL execution?

Question

I want to run the below query through Access-VBA and I receive the error in the attached screen. Any ideas how to solve it?

deletenew = ("DELETE * FROM TEST1 where [ADAM] = " & luadam & " and [Last_Update_Date]=" & " " & "")

DoCmd.RunSQL deletenew

Thanks in advance,

Andreas

question from:https://stackoverflow.com/questions/65840670/how-to-resolve-error-in-ms-access-vba-sql-execution

Answer 1

Your query is not properly written. This:

"where [ADAM] = " & luadam & " and [Last_Update_Date]=" & " <<MissingValue>> " & ""

where <<MissingValue>> is not valid date. MS Access database can NOT translate " " into date.

should be replaced with:

"where [ADAM] = '" & TextValueHere & "' and [Last_Update_Date]= #" & ISODateHere & "#"

More at: Examples of using dates as criteria in Access queries