PASOS PARA CONECTAR BD ACCESS DESDE VB
- Abrir su proyecto
- Ir a Menu: Proyecto-Referencias, se abre una ventana.
- Buscar el componente Microsoft ActiveX Data Objects 2.X (x será el mayor número disponible)
- Marcar el checkbox, para incluir la referencia de manejo de datos.
- Agregue un nuevo módulo al proyecto. Y copiar el código siguiente:
Public conexionBD As New ADODB.Connection
Esto se hace para generar el objeto de conexión a la BD.
- Agregue un método sub main (funcion principal) y copie el código siguiente:
Sub main()
conexionBD.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;data source=" & App.Path & "\subasededatos.mdb”
conexionBD.Open
End Sub
Donde: conexionBD.ConnectionString asigna la cadena de conexión de la BD, se usa oledb4.0 para BD access2000.
La base de datos recomiendo colocarla en la misma carpeta del proyecto para usar la variable App.path, que representa la dirección en disco de la carpeta que contiene el proyecto. De esta manera se evita cambiar la ubicación de la BD cada vez que mueva su proyecto. Por ultimo abre la conexión, usando instrucción open
