Datagridview y mysql
Publicado por agustín (24 intervenciones) el 23/01/2013 15:59:50
Hola
Soy nuevo en esto de vb.net y me gustaría que me ayudaran
Estoy intentando enlazar un datagridview con los datos de una tabla de mysql. He establecido la conexión correctamente pero no puedo insertar los datos en el datagridview.
Les pongo el código que estoy utilizando:
en el form principal llamo al módulo "Conectar":
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
conectar("miservidor", "miusuario", "micontraseña")
End Sub
y en el módulo tengo:
Imports MySql.Data.MySqlClient
Module Conexion_mysql
Friend dbConexion As MySqlConnection
Public Sub conectar(ByVal servidor As String, ByVal usuario As String, ByVal pass As String)
Try
dbConexion = New MySqlConnection()
dbConexion.ConnectionString = "server=" & miservidor & ";" & "user id=" & miusuario & ";" & "password=" & micontraseña & ";"
dbConexion.Open()
MessageBox.Show("Conectado al servidor")
Catch ex As MySqlException
MessageBox.Show("No se ha podido conectar al servidor")
End Try
End Sub
'HASTA AQUÍ TODO CORRECTO PERO A PARTIR DE AQUÍ ME DA ERROR...
Dim da As New MySqlDataAdapter(sql, dbConexion)
Dim ds As New DataSet
da.Fill(ds, "tabla")
dbConexion.Close()
Dim dt as DataTable=ds.Tables(0)
Datagridview1.DataSource=dt
End Sub
End Module
Por favor agradecería una ayudita ya que no se pq no funciona y perdonen por mi ignorancia
Saludos
Soy nuevo en esto de vb.net y me gustaría que me ayudaran
Estoy intentando enlazar un datagridview con los datos de una tabla de mysql. He establecido la conexión correctamente pero no puedo insertar los datos en el datagridview.
Les pongo el código que estoy utilizando:
en el form principal llamo al módulo "Conectar":
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
conectar("miservidor", "miusuario", "micontraseña")
End Sub
y en el módulo tengo:
Imports MySql.Data.MySqlClient
Module Conexion_mysql
Friend dbConexion As MySqlConnection
Public Sub conectar(ByVal servidor As String, ByVal usuario As String, ByVal pass As String)
Try
dbConexion = New MySqlConnection()
dbConexion.ConnectionString = "server=" & miservidor & ";" & "user id=" & miusuario & ";" & "password=" & micontraseña & ";"
dbConexion.Open()
MessageBox.Show("Conectado al servidor")
Catch ex As MySqlException
MessageBox.Show("No se ha podido conectar al servidor")
End Try
End Sub
'HASTA AQUÍ TODO CORRECTO PERO A PARTIR DE AQUÍ ME DA ERROR...
Dim da As New MySqlDataAdapter(sql, dbConexion)
Dim ds As New DataSet
da.Fill(ds, "tabla")
dbConexion.Close()
Dim dt as DataTable=ds.Tables(0)
Datagridview1.DataSource=dt
End Sub
End Module
Por favor agradecería una ayudita ya que no se pq no funciona y perdonen por mi ignorancia
Saludos
Valora esta pregunta
0