Conexión DB Access con VB 6.0
¿Por favor podría colaborarme con la conexión paso a paso de mi DB ya terminada con mi Proyecto de VB?
No tengo ni la menor idea de como comenzar.
Gracias, es de suma importancia y demasiada urgencia.
No tengo ni la menor idea de como comenzar.
Gracias, es de suma importancia y demasiada urgencia.
1 Respuesta
Respuesta de orande
1
Una conexión con una BBDD es sencilla. Te envío el código en ADO (referencia "Microsoft ActiveX Data Access 2.5" o superior) para abrir una BBDD Access (según el modelo de base de datos, cambia el proveedor utilizado):
Private Sub AbrirBD(ByVal PathBD As String)
Const MS_ACCESS_2000 = "Microsoft.Jet.OLEDB.4.0"
Dim BBDD As ADODB.Connection
Set BBDD = New ADODB.Connection
BBDD.ConnectionString = "Provider=" & MS_ACCESS_2000 & ";" & _
"Data Source=" & PathBD
BBDD.Mode = adModeReadWrite
BBDD.Open
End Sub
Si tienes más preguntas ya sabes donde encontrarme. ;)
Private Sub AbrirBD(ByVal PathBD As String)
Const MS_ACCESS_2000 = "Microsoft.Jet.OLEDB.4.0"
Dim BBDD As ADODB.Connection
Set BBDD = New ADODB.Connection
BBDD.ConnectionString = "Provider=" & MS_ACCESS_2000 & ";" & _
"Data Source=" & PathBD
BBDD.Mode = adModeReadWrite
BBDD.Open
End Sub
Si tienes más preguntas ya sabes donde encontrarme. ;)
