Cómo consultar una base de datos Microsoft Access mediante DSN

Es útil saber cómo consultar una base de datos Microsoft Access con un nombre de origen de datos (DSN) a través de una conexión Open Database Connectivity (ODBC). Microsoft Access es una aplicación de base de datos relacional que se utiliza comúnmente para las bases de datos más pequeñas. Visual Basic.NET a menudo se utiliza para conectarse a una base de datos Access. Los programadores suelen requerir la consulta de una base de datos contenidos para su posterior manipulación de datos. El uso de un DSN es conveniente porque se puede actualizar manualmente el DSN para que apunte a una base de datos diferente sin tener que editar el código de Visual Basic.

Instrucciones

1 Iniciar Microsoft Visual Basic 2010 Express, haga clic en "Archivo" y seleccionar "Nuevo proyecto ...". Haga clic en "Windows Forms applciation" y seleccione "OK".

Haga doble clic en "botón" en el menú "Herramientas" para añadir un nuevo botón para "Form1". Haga doble clic en "Button1" para abrir "Form1.vb". Tipo "Las importaciones System.Data.Odbc.OdbcConnection" en la primera línea del módulo "Form1.vb".

2 Haga clic dentro de "Private Sub Button1_Click" y escriba lo siguiente para declarar las variables y abra su conexión DSN:

Dim loopCounter como número entero

Dim ODBCConn Como Odbc.OdbcConnection

ODBCConn = Nueva Odbc.OdbcConnection ( "DSN = MyDsn")

odbcConn.Open ()

Editar "DSN = MyDsn" para añadir su nombre "DSN".

3 Escribe lo siguiente para consultar la base de datos de acceso:

Dim OdbcDataAdapter Como Nueva Odbc.OdbcDataAdapter ( "SELECT * FROM Tabla1 Tabla1;.", ODBCConn)

Dim odbcDataSet Como Nueva Data.DataSet

odbcDataAdapter.Fill (odbcDataSet)

Editar "SELECT * FROM Tabla1 Tabla1;". añadir su consulta en particular.

4 Escriba el siguiente colocar a través de la consulta y mostrar un cuadro de mensaje con información del primer campo:

Para loopCounter = 0 Para odbcDataSet.Tables (0) .Rows.Count - 1

MsgBox (odbcDataSet.Tables (0) .Rows (loopCounter) .Item (0))

Siguiente

5 Escriba lo siguiente para liberar las variables de la memoria:

odbcConn.Close ()

odbcConn.Dispose ()

ODBCConn = nada

Pulse la tecla "F5" para ejecutar el programa y haga clic en "Button1".