Opening a new mdb from existing mdb

[Jim Pockmire]

Is it possible to open a new mdb using Call Shell("command line for path to
MS-Access and mdb to open")? If so,

1. can I specify the default location of MS-Access rather than fully
defining C:\Program Files\...

2. similarly, can I specify an mdb in the same folder as the current mdb
without fully defining the path?

I recall their being variables that start with a % or $ that may do this,
e.g. $(AppPath).

 

[StCyrM]

Good morning

The following code should do it for you.

Sub OpenExistingDataBase()
Dim retVal As Long
Dim AccPath As String
Dim DbPath As String

AccPath = "C:\Program Files\Microsoft Office\Office\MSAccess.exe"
DbPath = "D:\db1.mdb"

retVal = Shell(AccPath & " " & DbPath)

End Sub


Best Regards

Maurice St-Cyr
Micro Systems Consultants, Inc.

 

[Jim Pockmire]

What about using intrinsic variables (if that is the right term)? e.g. Can I
sustitute something like $(appPath)\MsAccess.exe for "C:\Program
Files\Microsoft Office\Office\MSAccess.exe". This way if the user had the
program in a different folder or was running it from the network, it would
find the program.

Similarly, is there variable to refer to the folder that the currently open
database resides in?

 

[X. Zhang]

Try this:

SysCmd(acSysCmdAccessDir) & "MSACCESS.EXE"

Xidong Zhang