26/12/2008, 02:13
|
| Colaborador | | Fecha de Ingreso: enero-2008 Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 16 años, 3 meses Puntos: 37 | |
| Respuesta: Acceo a base de datos .mdb con clave usando datacontrol
Cita:
Iniciado por jcob10  Amigos!!
Como puedo accesar a una base de datos en acces 97 con clave usando un control "datacontrol"? 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
 |