run time error '-2147023170 (800706be)

  • Thread starter Thread starter Rpettis31
  • Start date Start date
R

Rpettis31

I am getting this error when I never received it before in office 03. My
local client was upgraded to office 07 and Win7 and now I get the above error
or runtime 462.
The error occurs at B.CloseCurrentDatabase.

The other code works however I would like to close the database at the end
of performing the tasks. This worked fine and faster in office 03.


Sub DMRList()

Dim B As Object

Set B = CreateObject("Access.Application")
B.Visible = False

B.OpenCurrentDatabase ("G:\Robert\Compliance
Shell\QADBASE_MASTER_20091207.mdb")

B.docmd.RunMacro "mcrDMRList"

B.CloseCurrentDatabase

B.Quit
 
Also for some reason they left me with Access 03 and the rest of the office
products are 07.
 
Back
Top