Database Platform

[Novice1]

I have 10 small databases. At present, I have another database which serves as a platform to launch the 10 databases. I have a graphic for each database and posted an Event Procedure for each graphic to launch the respective database. For example ...

Dim accapp As Access.Application

Set accapp = New Access.Application

accapp.OpenCurrentDatabase ("M:\MPF\MPF_Mgmt_Info_System\SignInPlus\SignInPlus.accdb")
accapp.Visible = True

Is this the best way to centrally locate and launch multiple databases or is there are smarter way? Thanks

 

[RainLover]

Please tell us more about these 10 Databases.

 

[Novice1]

They're all part of office operations. Some are related. Some are not. For example, one is used for customer surveys. It's unrelated to the other databases. One is used to track military decorations. One is used to track computer operations. Some of the databases pull information from the other databases.

 

[RainLover]

I don't know how to do what you want but I have an alternative that may help.

Using a blank Database create a Form.

Create 10 Buttons, one for each database.

Then with the onclick event of each button write some code that opens a Database. Repeat for each different Database.

You should be able to Google for some sample code.

Hope this helps.

 

[Novice1]

Thanks. That's what I did (code posted in my first entry). I was wondering if this was the smartest way.

When I added code to minimize the start platform (database as you suggest) and then open a new database, sometimes the database I'm trying to open gets "hung up" (database will not open). It will open if I open it by itself but not from the launch platform.

 

[RainLover]

  I was wondering if this was the smartest way.

There is always more ways to skin a cat. Mine was a suggestion. Do you have another idea.

You have not given any information of why your DB freezes.

What else have you got that is important.

 

[RainLover]

You keep referring to a Graphic.

I am not familiar with this term. What does it mean.

Also what version of access are you using.