BD ACCES CON CONTRASEÑA
Publicado por Rafa (7 intervenciones) el 25/10/2004 20:17:07
Con el siguiente codigo intento abrir una base de acces 2003 DESDE VB con contraseña mediante un control data pero no me funciona que sera lo que esta mal...
Sub DAOOpenDBPasswordDatabase()
Dim db As DAO.Database
Set db = Data1.DatabaseName("C:\Nept.mdb", _
False, False, ";pwd=2000")
Data1.RecordSource = "clientes"
db.Close
End Sub
Sub DAOOpenDBPasswordDatabase()
Dim db As DAO.Database
Set db = Data1.DatabaseName("C:\Nept.mdb", _
False, False, ";pwd=2000")
Data1.RecordSource = "clientes"
db.Close
End Sub
Valora esta pregunta
0