Dim db As Database Dim oAcc As Access.Application Set oAcc = New Access.Application Set db = oAcc.DBEngine.OpenDatabase("ruta\baseprotegida.mdb", True, False, ";PWD=tucontraseņa")
Dim db As Database Dim oAcc As Access.Application Set oAcc = New Access.Application Set db = oAcc.DBEngine.OpenDatabase("ruta\baseprotegida.mdb", True, False, ";PWD=tucontraseņa")
|
|
|
|