How get path of executing database?

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I'd like to get the path of the current database from inside VBA.
Is this possible?
E.g. If my database is \\server1\Access\MyApp.mdb

I'd like to get "\\server\Access\" somehow
 
Here are two ways ...

CurrentProject.Path

Left$(CurrentDb.Name, Len(CurrentDb.Name) - Len(Dir(CurrentDb.Name)) -
1)

The first method requires Access 2000 or later, the second will also work
with earlier versions.
 
Back
Top