Open new Access window/database?!?

[Beren1h]

I'm trying to open new database (with the access window maximized) from a different database. My code:

Dim appAccess As Object
Dim str As String

str = "C:\My Documents\Projects\CTM.mdb"

Set appAccess = CreateObject("Access.Application&quot

With appAccess
.OpenCurrentDatabase str
.Visible = True
End With


It opens the CTM database, but it flashes on the screen for a second and then seems to close. Also I don't see how to open it with the access window maximized.

Any help?

 

[930driver]

I just dropped your code into a test mdb and it worked fine (with appropriate changes to the name of the mdb to be opened). You may have some other code that is closing the newly opened mdb. Are you trying to close the mdb that opened the new one? You may be referencing the wrong mdb if you are. "The Key, The Whole Key, and Nothing But The Key, So Help Me Codd!"

 

[Beren1h]

There is no other code. I was playing around with this to see if it would work. I'm not closing the orginal database or anything.