VBA: executing an Update query is failing without an errro

[AndyCotgreave]

Hi,
In Access VBA, I build an update query, and execute it as follows:

Dim strSQL as String
Dim db as Database
Set db = CurrentDb
[...snip...]
strSQL = "UPDATE [...snip...]"
db.Execute strSQL

The update does not take place, but there is no error reported. The
code has worked previously, but I have had to rebuild the backend
database (another MDB) following a data corruption. I don't know if
this is relevant.

The UPDATE string is valid: I created a new query, and pasted the code
into the SQL view. It ran without a problem and updated the record
correctly.

Any ideas?

Running:
Access 2003
Windows XP Sp2

Thanks,
Andy

 

[Albert D.Kallal]

Do two things:

Place a debug.print in your code as follows:

debug.Print strSQL
db.Execute strSQL

Now, run the code. Now, go to the debug window (ctrl-g), and now cut and
paste the sql into the query builder.

Can you run it in the query builder?....can you see any problems with it?

By the way, if you want have it error out, then use

db.Execute strSQL, dbFailOnError