Bueno en otro artículo habiamos visto como conectar Visual Basic .NEt y MySQL, en estemismo post " [VB.NET] Conectar Visual Basic .NET y MySQL Parte 1 " , entonces aprendimos lo básico. Ahora vamos a ver como hacer consultas en la base de datos y visualizarlas en un DataGridView. Como siempre empezamos con el código completo:
[highlight=vb.net]Private Sub sancionesform_Activated(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Activated
conexion = New MySqlConnection()
conexion.ConnectionString = "server=" & servidor & ";" & "user id=" & usuario & ";" & "password=" & pswd & ";" & "database=" & nombre_conexion & ";"
conexion.Open()
Dim table As DataTable
Dim adaptador As MySqlDataAdapter
Dim builder As MySqlCommandBuilder
table = New DataTable
adaptador = New MySqlDataAdapter("SELECT inicio,terminacion,razon FROM sanciones WHERE cedula =" & "'" & cc_visitante & "';", conexion)
builder = New MySqlCommandBuilder(adaptador)
adaptador.Fill(table)
DataGridView1.DataSource = table
End Sub[/highlight]
Con esto conectamos a la base de datos:
[highlight=vb.net]conexion = New MySqlConnection()
conexion.ConnectionString = "server=" & servidor & ";" & "user id=" & usuario & ";" & "password=" & pswd & ";" & "database=" & nombre_conexion & ";"
conexion.Open()[/highlight]
Ahora vamos a crear tres nuevas variables (y constructores), con la primera trabajremos la base de datos en modo tabla, con la segunda creamos un adaptador (es decir un conversor) y con la tercera creamos un nuevo comando MySQl:
[highlight=vb.net]Dim table As DataTable
Dim adaptador As MySqlDataAdapter
Dim builder As MySqlCommandBuilder[/highlight]
Creamos un objeto:
[highlight=vb.net] table = New DataTable[/highlight]
Creamos un nuevo objeto de la variable adaptador y luego añadimos como cadena la consulta SQl.
[highlight=vb.net]adaptador = New MySqlDataAdapter("SELECT inicio,terminacion,razon FROM sanciones WHERE cedula =" & "'" & cc_visitante & "';", conexion)[/highlight]
Creamos un nuevo objeto del constructor de comandos MySQL y le pasamos como parámetro la variable adaptador, para que interprete la consulta SQL.
[highlight=vb.net]builder = New MySqlCommandBuilder(adaptador)[/highlight]
Luego dibujamos el adaptador en la variable que contendrá la tabla:
[highlight=vb.net] adaptador.Fill(table)[/highlight]
Y por último lo dibujamos en el datagrid:
[highlight=vb.net]DataGridView1.DataSource = table[/highlight]
Dejo un enlace un poco des actualizado pero sirve igual:
MySQL Hispano - La comunidad de usuarios de MySQL




LinkBack URL
About LinkBacks
