How do I find the MSAccess.exe file path??

[GGerard]

Hello

I would like to be able to retrieve the path of the MSAccess.exe file
through code.

Using (Application.CurrentProject.BaseConnectionString) :
I can retrieve the path of the workgroup and the mdb file.

Using (Application.DBEngine.IniPath) :
I can retrieve what seems to be the Windows Registry Key path for the
Jet engine

But I can seem to find a function to retrieve the MSAccess.exe path

Does anyone know of a way?

Thanks
G.Gerard

[Albert D. Kallal]

Try the follwing code:

Dim strPath As String

strPath = Left(CurrentDb.Name, InStrRev(CurrentDb.Name, "\"))

MsgBox "current path name to database is " & vbCrLf & _
strPath

MsgBox "current path to msaccess.exe is " & vbCrLf & _
SysCmd(acSysCmdAccessDir)

--
Albert D. Kallal (Access MVP)
Edmonton, Alberta Canada
pl*****************@msn.com
http://www.members.shaw.ca/AlbertKallal

[Douglas J. Steele]

SysCmd(acSysCmdAccessDir)

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)

"GGerard" <gg*****@nbnet.nb.ca> wrote in message
news:%F*********************@ursa-nb00s0.nbnet.nb.ca...

Hello

I would like to be able to retrieve the path of the MSAccess.exe file
through code.

Using (Application.CurrentProject.BaseConnectionString) :
I can retrieve the path of the workgroup and the mdb file.

Using (Application.DBEngine.IniPath) :
I can retrieve what seems to be the Windows Registry Key path for the
Jet engine

But I can seem to find a function to retrieve the MSAccess.exe path

Does anyone know of a way?

Thanks
G.Gerard