21/02/2005, 13:55
|
 | | | Fecha de Ingreso: mayo-2004 Ubicación: México
Mensajes: 2.702
Antigüedad: 20 años Puntos: 0 | |
| Usando ADO
Proyecto-> Referencias->Microsoft Active Data Objects 2.xx
Declaras:
Dim cn As New ADODB.Connection
En el load de la forma:
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\mi_base.mdb" & ";Persist Security Info=False;Jet OLEDB:Database Password=Tu_pass"
En el unload:
cn.Close |