fbpx

Como Abrir base de dados com Senha ?

Este exemplo utiliza o objeto Dao Jet. Para outros objetos consulte o Help do VB.
Para abrir o banco é necessário passar a senha no parâmetro Connect. No exemplo abaixo, a senha é “web”.

Dim wrk As Workspace

Dim db As Database

Set wrk = DBEngine.Workspace(0)

Set db = wrk.OpenDatabase(“MYDB.MDB”, false, false, “;PWD=web”)

O parâmetro Connect (4o parâmetro) é case sensitive (diferencia A de a) e – ao contrário do que diz a documentação do VB – os parâmetros exclusive e read-only (2o e 3o parâmetros) devem ser falsos.

Compartilhe esta matéria
  , ,


Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Esse site utiliza o Akismet para reduzir spam. Aprenda como seus dados de comentários são processados.