Error in SQL-statement (Insert)

[JB83]

Dear reader(s),

I have a problem with DoCmd.RunSQL: when I want to add a record in a table with a WHERE-clause I get a syntax error, and I don't know how to solve the problem.


DoCmd.RunSQL ("INSERT INTO [tblReasons] (Reason1, Reason2, Reason3, Reason4, Reason5, Reason6)
SELECT " & defReason & " , " & defReason & " , " & defReason & ", " & defReason & " , " & defReason & " , " & defReason & " WHERE docNumber = txtDocNumber.Value&quot


Thanks in advance,

Jochen. --------------------------------------------------------------------------------
It never hurts to help and it never helps to hurt.

 

[ajdesalvo]

In the Reason variables are text, you need single quotes. Also if txtDocNumber is a form field, it also need quotes:

DoCmd.RunSQL ("INSERT INTO [tblReasons] (Reason1, Reason2, Reason3, Reason4, Reason5, Reason6)
SELECT '" & defReason & "' , '" & defReason & "' , '" & defReason & "', '" & defReason & "' , '" & defReason & "' , '" & defReason & "' WHERE docNumber = '" & txtDocNumber.Value & "'&quot

Code away!
Anthony J. DeSalvo
President - ScottTech Software
"Integrating Technology with Business"

 

[JB83]

Thank you for your reply. I already have found a solution myself.

Keep up the good work!

--------------------------------------------------------------------------------
It never hurts to help and it never helps to hurt.