1 resposta neste tópico

[Javax]

Pessoal, como faço para recuperar o diretório absoluto de um arquivo *.accdb em VBA?
Suponhamos que tenho um arquivo access chamado Teste.accdb, que está localizado em C:\Exemplos\Teste.accdb.
Como faço então para obter este diretório?
Tentei o seguinte trecho:

Private Sub botao_Click()
    MsgBox FileSystem.CurDir
End Sub

Porém, não retorna o diretório do arquivo pretendido.

Exemplifiquem se possível.

[Renan L Queiroz]

Achar o diretório do arquivo direto, seria por meio de pesquisa e eu não fiz nada assim até o momento.
O que conheço é acessar o diretório do arquivo tendo conhecimento do mesmo, onde você utiliza CurDir
como feito anteriormente agregando a outra parte do endereço.

O CurDir funciona de diferentes maneiras, veja:

CurDir[(driver)]

O parametro driver se não informado traz o caminho do drive atual.
Caso utilizado por exemplo:

CurDir("D")

Ele trará o caminho para o driver D, on o mesmo pode ser mapeado.
Como por exemplo: D:/Sistemas/Bancos.