open a second database from within a database 1

[hellohello1]

I am using Access 2003 and I'm trying to open a second database from within a database.

I tried this code behind a command button:

Shell ("""" & "c:\Program Files\Microsoft Office\OFFICE11\MSAccess.exe" & """" & " " & """" & sAdhocReport & """")

where sAdhocReport is the full path of my other database.

It works. I'm just looking for two things:
1). Currently, the second database opens, but it doesn't pop up. It stays on the Windows task bar. How can I make the second database to be the focus?

2). I would like the second database to open showing the Reports Window.

Thanks!

 

[PHV]

1) You may try to use the AppActivate instruction
2) Have a look to the /x switch

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

 

[hellohello1]

PHV, thanks for writing. I tried AppActivate, but it didn't work:

Dim adhocID As Integer

adhocID = Shell("""" & "c:\Program Files\Microsoft Office\OFFICE11\MSAccess.exe" & """" & " " & """" & sAdhocReport & """")

AppActivate adhocID

Then I did a google search for /x switch but couldn't find anything relevant to my situation.

Thanks,

 

[PHV]

Have a look here:

http://support.microsoft.com/kb/209207

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

 

[hellohello1]

thanks again for writing PHV.

I looked at the website, but still don't get it. I don't need to run a macro, I just want the second Access database to have the focus after it opens, and then show the main reports window.

thanks!

 

[combo]

Why not by automation?:

Dim acApp As Access.Application

Sub test()
Set acApp = New Access.Application
acApp.OpenCurrentDatabase "D:\Path\FileName.mdb"
acApp.Visible = True
End Sub

Access application should be declared in module.


combo

 

[hellohello1]

combo,

thanks for writing.

i can't get your code above to work. it starts to open the second database (I get the security warning from the second database), but then it disappears and it never opens.

thanks,

 

[combo]

Application object should be declated at module level:

When the variable pointing to the Application object goes out of scope, the instance of Microsoft Access that it represents closes as well. Therefore, you should declare this variable at the module level.

See in object browser ahd help file the additional parameters of OpenCurrentDatabase method.

combo

 

[hellohello1]

it works!! thanks Combo!