Connect an Access DB to another running Access DB

  • Thread starter Thread starter Warrio
  • Start date Start date
W

Warrio

Hello!

Would it be possible to connect a Access database to another Access
Database?
I've used :
Dim MyDB as Access.Application
Set MyDB = CreateObject("Access.Application")
MyDB.OpenCurrentDatabase "C:\db2.mdb"

But the code above opens a new instance of db2.mdb even if it is already
running!
How can I get connected to db2.mdb without opening it a second time?

Thanks in advance.
 
What exactly do you mean by "connect a Access database to another Access
Database"?

You could try using GetObject instead of CreateObject to get the already
open instance, but I can't really figure out what you're trying to do.
 
Have you tried setting a reference to the second database? That will allow
you to use its forms, reports, and code. Linking to the tables of the second
database will allow you to use its tables.
 
Dim MyDB as Access.Application
Set MyDB = CreateObject("Access.Application")
MyDB.OpenCurrentDatabase "C:\db2.mdb"

But the code above opens a new instance of db2.mdb even if it is already
running!
How can I get connected to db2.mdb without opening it a second time?
Click to expand...

Just delcare a new database ojbect...and go:

Dim db As DAO.Database
Dim rstCust As DAO.Recordset

Set db = OpenDatabase("C:\db2.mdb")

' now....

Set rstCust = db.OpenRecordset("select * from tblCustomers")

So, there is no need at all to launch antoher copy of ms-access if all you
want is to read data....
 
The thing with referencing the db2 in db1 is that it works perfectly, but it
opens the form into bd1
and the problem is that I want to open a form in db2, give it the focus and
then close db1.

Thanks again!
 
I found a way after all but it's very arranged!
Access has the option of creating a shortcut to a form and store it as an
AMF file (by drag & droping the form on windows folder)
so all what I tryed to do is to open this file with a shell command (Shell
"C:\OpenMyForm.amf").
However this shows an error "Invalid call procedure"
so I put C:\OpenMyForm.amf in a bat file and opend this bat file from vba
with Shell "C:\OpenMyForm.bat"
and IT WORKS even if it is arranged :0)

But I'm sure there is a way to do this in Access without all this
manipulations... so I'm still interested if anyone finds the answer..
Thanks for your help

PS: the shortcut file contains this:

[Shortcut Properties]
AccessShortcutVersion=1
DatabaseName=Nouveau Microsoft Access Application.mdb
ObjectName=Form2
ObjectType=Form
Computer=PRIVA-INFO
DatabasePath=C:\Documents and Settings\Tarek\Mes documents\Nouveau Microsoft
Access Application.mdb
EnableRemote=0
CreationTime= 1c712f58993fa94
Icon=263
 
Back
Top