Get Current Directory/Path?

[DJKAOS]

In Access 97 how do I get the current directory/path?

I tried
Dim MyPath
MyPath = CurDir

I also tried
Dim MyPath
MyPath = CurDir("C:&quot (I think)

but it says library not found for CurDir... any Ideas?

Thanks

 

[oharab]

Not sure what you mean by "current directory", but if you mean the directory the database is in then:

Function GetDBLocation() As String
Dim db As Database
Set db = CurrentDb
GetDBLocation = left(db.Name, Len(db.Name) - Len(Dir(db.Name)))
Set db = Nothing
End Function

will do the trick.

B ----------------------------------
Ben O'Hara
bo104@westyorkshire.pnn.police.uk
----------------------------------