Um amigo meu me ensinou a acessar um BD protegido assim:

 

Set BD = OpenDatabase(App.Path & "CYBERBASE.mdb", False, False, ";PWD=senha")
Set TBCliente = BD.OpenRecordset("cliente", dbOpenTable)

 

Deu certo... mas alguns forms meu acessão o BD de forma diferente:

 

Assim:

 

Data1.DatabaseName = (App.Path & "CYBERBASE.mdb")
e
DBPath = App.Path & "Cyberbase.mdb"

 

Tentei acrescentar depois do .mdb" os comandos , False, False, ";PWD=senha"  e quando clico fora ele dar um erro e seleciona a virgula antes do primeiro false.

 

como farei para acrescentar , False, False, ";PWD=senha"   nesses dois exemplos de cima? 

Muito simples, não use controles para manipulação de dados.

não era bem essa ajuda que queria!

 

Alguem pode me ajudar?

 

Pois tenho 28 forms usando datacontrol e não posso mudar só por isso!

 

Agradeço a todos

Help-me

veja essa dica

 

http://www.vbweb.com.br/dicas_visual.asp?Codigo=2900&Classificacao=

autodidata EU tb passei por isso, mas antes de encontrar esse pequeno codigo eu fiz o seguinte. abri o banco vai codigo primeiro sem o data e depois atualizava o data antes de fechar e db e funcionou durante um bom tempo ate eu encotrar na net esse esquema para abrir o banco com senha com o obj data. muito bom ! valeu

pastor