Error running UPDATE query in VB

[brenton]

Update query runs successfully as a query object. Copied
to VB module get the following error message.
"Run-time error 3129"
Invalid SQL Statement;
expected 'DELETE', 'INSERT', 'PROCEDURE', 'SELECT'
OR 'UPDATE'.

I have not been able to run any UPDATE queries at all when
converted to VB using RunSQL method. I can only run
UPDATE queries as query objects and call them using
open.query method.

Knowledge base article 163054 is similar but this article
refers to problem caused by DISTINCTROW statement when
converting database. My SQL statement does not contain
DISTINCTROW.

This is the SQL statement as copied from query object.
UPDATE SelectTenderLand INNER JOIN Ref_Suburb ON
SelectTenderLand.Suburb = Ref_Suburb.Suburb SET
SelectTenderLand.SuburbCode = [Ref_Suburb].[SuburbCode];

 

[Ken Snell]

Post the code that you're using to try to run this query.