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 ISSO:

Share on facebook
Facebook
Share on twitter
Twitter
Share on linkedin
LinkedIn
Share on pinterest
Pinterest
Share on tumblr
Tumblr
Share on whatsapp
WhatsApp
Share on reddit
Reddit
Share on email
Email

Comentários

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.