Ajuda Sobre Banco De Dados

[PedroBarreto]

Galera, no vb eu criei um data1, nele eu coloquei um bdd chamado teste.mdb, que se encontra no diretorio: c:/teste.

Tem algo que eu possa fazer para que se eu colocar o banco de dados em outro local exemplo c:/arquivos de programas/teste ele acha tambem. ou seja, ele acha em qualquer diretorio do c:.

Obrigado!!

[Graymalkin]

Sim, você pode fazer algo assim:

diretório = App.Path
    If Right(diretório, 1) = "\" Then diretório = Left(diretório, Len(diretório) - 1) 'Retira a última \ se ela estiver presente
    
    Data1.DatabaseName = diretório & "\teste.mdb"
    Data1.Refresh

Com isso o seu programa vai procurar o banco no mesmo diretório onde estiver o executável.

Certo? ;)

Graymalkin