Microsoft Access es un pequeño motor de base de datos utilizada por los principiantes o para los sitios web de pequeña escala. Puede utilizar Visual Basic ( VB ) para consultar la base de datos directamente en el código. Esto es beneficioso para aquellos que quieren ofrecer un sitio web dinámico para sus lectores. Para consultar la base de datos , debe crear una conexión, enviar la consulta y asignar los resultados a su propia variable de Visual Basic . Instrucciones
1
Haga doble clic en el formulario de Visual Basic para abrir el código del archivo y cargarlo en tu editor de VB . Vaya a la sección de su código de VB en la que desea colocar la conexión de base de datos y consulta.
2
Crea tu conexión de base de datos . La variable de conexión contiene el servidor y base de datos a la que desea conectarse. El siguiente código crea una conexión:
conec As String = "Data Source = localhost ; Initial Catalog = Northwind ; Integrated Security = True "
sqlcon As SqlConnection = New SqlConnection (conn )
sqlcon.Open ()
el texto " localhost" se conecta al equipo local en el que se encuentra el código del sitio web . Si el servidor de base de datos está en un equipo diferente , escriba el nombre del equipo en lugar de " localhost ". Reemplazar " Northwind " con el nombre de su base de datos.
3
consulta las tablas y recuperar la información de su base de datos. El código siguiente muestra cómo consultar acceso utilizando la conexión creada en el paso tres :
Dim Variable As String = "Miami "
strSelect As String = "SELECT * FROM Clientes WHERE City = '"& variable & " ' "
dscmd As New SqlDataAdapter ( strSelect , sqlcon )
Dim ds As New DataSet ()
dscmd.Fill (ds , " clientes " )
En el código anterior , se envía una consulta a la base de datos Access utilizando la variable llamada " variable " . Esta variable contiene la ciudad "Miami . " Esta variable se envía a la base de datos Access . La consulta se envía y se mantiene en una variable de conjunto de datos denominado "ds ".
4
Imprime el primer registro para probar su nuevo código. El siguiente código imprime el apellido del primer registro de los resultados de la consulta :
ds.Tables.Item MsgBox ( " apellidos " )
