Get backend folder path

[Rachael]

Hi All,

could someone kindly tell me how to get a folder path rather than a file path

I use this to get my backend file path:

Dim strConnect As String
strConnect = Mid(DBEngine(0)(0).TableDefs("Blocks").Connect, Len(";DATABASE=") + 1

But would like to get only the folder path ie the same as above but not containing the actual file name.

Thankyou,

Cheers, Rach

 

[ghudson]

If you want the path and the name of the current database, then use:
CurrentDb.Name

If you want just the name of the current database, then use:
Dir(CurrentDb.Name)

Or if you want the path to the current database, then use:
Left(CurrentDb.Name,Len(CurrentDb.Name)-Len(Dir(CurrentDb.Name)))

HTH

 

[Rachael]

Cheers ghudson, thanks for your prompt response, the mist surrounding the VB language get a little thinner as time goes on, however, I think I still need the fog light on!

Kind regards, Rach