0% encontró este documento útil (0 votos)
217 vistas4 páginas

Ejemplos de Conexiones de Datos de Visual Basic

Este documento proporciona ejemplos de cómo conectarse a bases de datos MySQL y Access desde una aplicación de Visual Basic .NET. Explica cómo crear una conexión a MySQL usando SqlConnection y SqlDataAdapter, y cómo crear una conexión a Access usando OleDbDataAdapter para recuperar datos y llenar un conjunto de datos.
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como DOCX, PDF, TXT o lee en línea desde Scribd
0% encontró este documento útil (0 votos)
217 vistas4 páginas

Ejemplos de Conexiones de Datos de Visual Basic

Este documento proporciona ejemplos de cómo conectarse a bases de datos MySQL y Access desde una aplicación de Visual Basic .NET. Explica cómo crear una conexión a MySQL usando SqlConnection y SqlDataAdapter, y cómo crear una conexión a Access usando OleDbDataAdapter para recuperar datos y llenar un conjunto de datos.
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como DOCX, PDF, TXT o lee en línea desde Scribd
Está en la página 1/ 4

[Año]

Conexión de Visual
Basic
MSTRA. YOLANDA CATALINA NAVARRETE

Alumna. Ana Patricia Muñoz Martínez


Ejemplos de conexiones de datos con:

MYSQL
Imports System.Data.SqlClient
Imports System.Data.OleDb

Public Class frm_acenso_emp


Dim cad_conexion As New SqlConnection(cs.ToString)
Private Const cs As String = "Data Source=pro5;Initial catalog=db_alvi;user id =
sa;password = xxxxxxxx"
Dim ds_acenso As New DataSet
Dim da_acenso As New SqlDataAdapter
Dim mi_comando As New SqlCommand
Dim consulta As String

Private Sub frm_acenso_emp_Load(ByVal sender As System.Object, ByVal e


As System.EventArgs) Handles MyBase.Load

txt_fecha.Text = DateString
dgv_acensos.Focus()

consulta = "select * from dbo.acenso_emp"

With mi_comando
.CommandText = consulta
.Connection = cad_conexion
End With

With da_acenso
.SelectCommand = mi_comando
.Fill(ds_acenso)
End With

dgv_acensos.DataSource = ds_acenso.Tables(0) ' // y muestro los


datos :)//

End Sub
Access

Crear una nueva aplicación basada en Windows con Visual Basic .NET.

1. Inicie Microsoft Visual Studio .NET.


2. En el menú Archivo, seleccione
Nuevo y haga clic en Proyecto.
3. En Tipos de proyecto, haga clic en Proyectos de Visual Basic.
4. En Plantillas, haga clic en Aplicación para Windows y luego haga clic
en Aceptar.

De forma predeterminada, se crea Form1.


Abra una conexión a la base de datos de Access

1. En el menú Ver, haga clic en Explorador de servidores.


2. En el Explorador de servidores, haga clic con el botón derecho
en Conexiones de datos y luego haga clic en Agregar conexión.
3. En el cuadro de diálogo Propiedades de vínculo de datos, haga clic en la
pestaña Proveedor.
4. En la lista Proveedor OLE DB, haga clic en
Proveedor OLE DB de Microsoft Jet 4.0 y luego en
Siguiente.
5. Haga clic en la pestaña Conexión y luego en el botón de elipsis (... ).
6. Busque el archivo testdb.mdb de base de datos de Access que creó
siguiendo la ruta de acceso correspondiente en su equipo.
7. Seleccione el archivo testdb.mdb y haga clic
Abrir.
8. En el cuadro de diálogo Propiedades de vínculo de datos, haga clic
en Aceptar.
Recupere los datos de la base de datos de Access utilizando la clase
OleDbDataAdapter

1. En el cuadro de herramientas, haga clic en la pestaña Datos.


2. Arrastre un control OleDbDataAdapter hasta Form1.
3. En el Asistente para la configuración del adaptador de datos, haga clic
en Siguiente tres veces.
4. En el panel Generar las instrucciones SQL, escriba la siguiente instrucción
de Microsoft SQL Server y en Siguiente:
Select * from Student

5. En el panel Ver resultados del Asistente, haga clic en


Finalizar.

Nota En el cuadro de diálogo ¿Desea incluir la contraseña en la cadena de


conexión?, haga clic en No incluir contraseña.
6. Haga clic con el botón secundario en OleDbDataAdapter1 y, a continuación,
haga clic en Generar conjunto de datos.
7. En el cuadro de diálogo Generar conjunto de datos, haga clic en
Aceptar.
8. Agregue el siguiente código al controlador de eventos Form1_Load:
'Fill retrieves rows from the data source by using the SELECT statement
OleDbDataAdapter1.Fill(DataSet11)
volver al principio

También podría gustarte