POS dbase Macro problem

[DavidRobertArchibald]

In our POS dbase I'm currently trying to run a Macro in a second database from a for in the first, I tried the following:
Sub AccessTest1()
Dim A As Object

Set A = CreateObject("Access.Application")

A.Visible = False

A.OpenCurrentDatabase ("C:\Documents and Settings\David Archibald\My Documents\GBL Database Project\Pending.mbd")

A.DoCmd.RunMacro "GBLPost"


End Sub

But I keep getting "Run-time error '7866': Microsoft Office Access can't open the database because it is missing, or opened exclusivly by another user"
I checked to make sure that there were no other instances of MSACCESS running (other then the one I'm runnning the macro from). Does anyone know how I can do this?

arch

 

[markphsd]

It may be easier to use a command line to run the macro, rather then setting any objects.

just open the .mdb, .mde with then /x switch. You may do this in code with the shell command.

Mark P.

http://www.cafecartel.com

Providing Low Cost Powerful Point of Sale Solutions.

 

[PHV]

And shouldn't mbd be replaced with mdb ?

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[markphsd]

Eh, I've updated my windows environment to spell check file extensions.

Mark P.

http://www.cafecartel.com

Providing Low Cost Powerful Point of Sale Solutions.

 

[DavidRobertArchibald]

Yep I'm an idiot, it was a spelling error in the file extension. Good Grief