Base de Datos con contraseña
Tengo una base de datos en access con contraseña, hago consultas desde visual basic y no tengo resultados y me saca error debido a la contraseña, como enlazo la BD con visual sin tener que quitarle la contraseña, o que codigo fuente me sirve para que tome la contraseña desde visual.
Gracias por colaborarme
Gracias por colaborarme
'Si abres la base de datos via codigo con Dao
dim Ws as workspace
dim db as database
dim rs as recordset
set ws = dbengine.workspaces(0)
set db = ws.opendatabase("c:mibd.mdb", false, false, ";pwd=Stella") 'Asumiendo password Stella
'Listo para hacer consultas o incluso usar datacontrols
set rs = db.openrecordset("select * from empleados", dbopendynaset)
dtcCatalogo.databasename = "c:mibd.mdb"
dtcCatalogo.recordsource = "Select * from empleados where baja=false"
dtcCatalogo.refresh
dim Ws as workspace
dim db as database
dim rs as recordset
set ws = dbengine.workspaces(0)
set db = ws.opendatabase("c:mibd.mdb", false, false, ";pwd=Stella") 'Asumiendo password Stella
'Listo para hacer consultas o incluso usar datacontrols
set rs = db.openrecordset("select * from empleados", dbopendynaset)
dtcCatalogo.databasename = "c:mibd.mdb"
dtcCatalogo.recordsource = "Select * from empleados where baja=false"
dtcCatalogo.refresh
