Update commands don't return a recordset - what are you trying to accomplish with that code?

I don't do VBA but there must be some kind of EXECUTE command that will run your ACTION query...