1)
Currentproject.path
currentdb.name
Dir(currentdb.name)
Left(currentdb.name, len(currentdb.name) - Len(dir(currentdb.name)))
left(Currentdb.Name, instrrev(currentdb.Name, "\"))
2)
Currentdb isnt in the object browser, no, but you probably found that already.