[Resolvido]Dúvida sobre Path

Boa noite caros amigos.
Gostaria de saber como faço para inserir um Path no codigo abaixo:

Código:

 db.Open "Provider=microsoft.ace.oledb.12.0;User ID=Admin;Data Source=C:\Users\InforPrint\Downloads\Ribbon 2007-20190522T003724Z-001\Ribbon 2007\banco.accdb;Mode=Share Deny None;Persist Security Info=False;Jet OLEDB:System database='';Jet OLEDB:Database Password='10102020'"

para nao ficar sempre tendo que colocar o caminho do banco de dados da minha aplicação.

desde ja agradeco a todos!

Esse código retorna o caminho do arquivo atual. Veja se resolve

Código:

Application.CurrentProject.Path

Esqueci de falar que o meu sistema eu estou desenvolvendo em VB6 e usando o banco de dados em access.
Como faço para inserir ali naquele codigo o PATH, para nao ficar colocando isso:

Código:

[code]Data Source=C:\Users\InforPrint\Downloads\Ribbon 2007-20190522T003724Z-001\Ribbon 2007\banco.accdb[/code]

Cria uma constante no access com path completo. Sempre que precisar basta referenciar a constante.
Outra opção é gravar esse path numa tabela que você pode chamar de configuracoes ou opcoes. Daí, quando precisar, basta busca na tabela com um DLookup.

Resolvido