Tecnología

Inicio

Cómo ejecutar consultas de Access en Visual Basic

Cómo ejecutar consultas de Access en Visual Basic


Tener el conocimiento para ejecutar consultas de Microsoft Access desde una aplicación de Visual Basic.NET puede ayudarle a hacer su aplicación más dinámica. El acceso es un sistema de gestión de base de datos relacional incluido en el paquete de Microsoft Office. Visual Basic.NET es un lenguaje de programación utilizado para desarrollar aplicaciones de Windows y es relativamente fácil de usar. A menudo se necesita para hacer cambios a una base de datos desde una aplicación de Visual Basic basado en la entrada del usuario. En unos pocos pasos, se puede escribir código de Visual Basic para ejecutar consultas en Access.

Instrucciones

1 Iniciar Microsoft Office Access y seleccione "Base de datos en blanco." Nombre de la base de datos "QueryTest" y haga clic en "Crear".

2 Crear una nueva tabla y el nombre de "Tabla1". En el primer tipo de fila "John" en "Campo1" y "Smith" en "Campo2."

Añadir otra fila escribiendo "Jaime" en "Campo1" y "González" en "Campo2."

Guardar "Tabla1" y cerrar.

3 Iniciar Microsoft Visual Basic 2010 Express y seleccionar "Nuevo proyecto" en el menú "Archivo". Seleccione "Aplicación de Windows Forms" y haga clic en "Aceptar".

Haga clic en "Herramientas" en el panel izquierdo de la ventana y haga doble clic en "botón" para añadir un botón a su formulario. Haga doble clic en "Button1" para abrir el módulo "Form1.vb", donde se va a escribir el código.

4 Tipo "Imports System.Data.OleDb" en la parte superior de su módulo "Form1.vb".

Haga clic dentro de "Private Sub Button1_Click" para comenzar a escribir el código de Visual Basic.

5 Escribe lo siguiente para declarar las variables de conexión y de mando:

myConnToAccess tenue Como OleDbConnection

MySqlCommand tenue Como OleDbCommand

Dim como secuencia mySQLStrg

6 Escriba lo siguiente para abrir una conexión con la base de datos de acceso "QueryTest":

myConnToAccess = nuevo OleDbConnection ( "Provider = Microsoft.Jet.OleDb.4.0; Data Source = C: \ QueryTest.mdb;")

myConnToAccess.Open ()

Editar "Fuente = C: \ QueryTest.mdb" e introduzca la ruta donde guardó su base de datos Access.

7 Escribe lo siguiente para ejecutar una consulta "Borrar" en la base de datos:

mySQLStrg = "BORRAR Table1.Field1 de la Tabla1 WHERE (((Table1.Field1) = 'John'));"

MySqlCommand = New OleDbCommand (mySQLStrg, myConnToAccess)

mySQLCommand.ExecuteNonQuery ()

Va a eliminar el registro donde "Campo1" es igual a "Juan".

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