Página 1 de 1
como abrir una bd de access con contraseña DAO en VB6
Publicado: Lun May 19, 2003 11:27 am
por fmartinv
La pregunta es la del enuciado,Se da por supuesto que yo se la contraseña, lo unico que quiero es evitar que alguien (que no sepa la contraseña) la pueda abrir con access
Creo que es el parametro "Conexion", del metodo "opendatabase".pero no me sale.
Publicado: Vie Jul 18, 2003 7:08 pm
por José Jimenez
es muy sencillo, si trabajas con Objetos Data en la propiedad Connect colocas
;pwd=clave
y en codigo es
contraseña = ";pwd=clave"
set bd = opendatabase(Ruta,,,False,clave)
Re: Lo siento me equivoque arriba, es asi
Publicado: Mar Jul 22, 2003 12:51 pm
por fmartinv
José Jimenez escribió:José Jimenez escribió: es muy sencillo, si trabajas con Objetos Data en la propiedad Connect colocas
;pwd=clave
y en codigo es
contraseña = ";pwd=clave"
set bd = opendatabase(Ruta,,False,contraseña)
=========================================
A ver antetodo darte las gracias por tu respuesta pero sigue sin funcionarme aqui te envio 4 líneas de código a ver si tu ves el fallo
Private Sub Command1_Click()
Dim Rs As Recordset
Dim CONTRA As Variant
Dim DB As Database
DB.Connect = "PEPE"
CONTRA = ";pwd=PEPE"
Set DB = OpenDatabase("I:\HIST.MDB", , False, CONTRA)
Set Rs = DB.OpenRecordset("Select * from Pacients", dbOpenDynaset, dbSeeChanges)
End Sub
Gracias Por anticipado