26/12/2008, 19:37
|
| | | Fecha de Ingreso: diciembre-2008
Mensajes: 10
Antigüedad: 16 años, 4 meses Puntos: 0 | |
| Respuesta: Acceo a base de datos .mdb con clave usando datacontrol
Cita:
Iniciado por Avellaneda  Creo que te refieres a DAO ¿no?
Código:
Dim db As DAO.Database, rs As DAO.Recordset, pw As String
pw = ";pwd=LaClave"
Set db = OpenDatabase(App.Path & "\BDconPWD.MDB", False, False, pw)
Set rs = db.OpenRecordset("Select * From LaTabla")
Set Data1.Recordset = rs
 |