Connectikng to an existing Access instance

J

Jake

Is there a way to create a Access.Application object that represents an
instance of Access that is already running on the system?

Alternately is there a way to test running instance of Access to deturmine
what database or project file it has open?
 
N

Norman Yuan

Dim app As Access.Application

On Error Resume Next
Set app=GetObject(, "Access.Application")
If err.Number<>0 Then
MsgBox "Cannot find running Access application instance!"
End If

Then you can look into
Application.CurretProject.FullName/Name/Connection/AccessConnection
properties for more information
 
Top