• Lunes 18 de Noviembre de 2024, 00:46

Autor Tema:  Pasar datos de consulta a un Datagrid  (Leído 3125 veces)

chevaz

  • Nuevo Miembro
  • *
  • Mensajes: 2
    • Ver Perfil
Pasar datos de consulta a un Datagrid
« en: Domingo 13 de Marzo de 2011, 00:08 »
0
Hola! Antes que nada me presento: Soy chevaz, me llamo Sebastián  :lol: y soy algo así como un 'programador aficionado' de Visual Basic.NET. Me registré en éste foro porque pude notar que cada vez que Googleo para encontrar la solución a un problema sale un link a este foro.

Les cuento mi problema:
Estoy haciendo un simple controlador de Stock, para el kiosco de un vecino/amigo. Las bases de datos que utilizo son en MySQL, la conexión la he logrado y las consultas las hace, no tengo ningún problema en eso.
Mi problema se presenta al momento de imprmir los resultados de una consulta en un datagridview, la verdad me está dando dolor de cabeza ya  :hitcomp:

He probado varios ejemplos de otras personas y sus open-source, y he utilizado éste, ya que mi código no utiliza los DataSource o controles así.

Código: vb.net
  1. Public Sub grid()
  2.         Try
  3.             Conexion = New MySqlConnection()
  4.             Conexion.ConnectionString = Sql
  5.             Conexion.Open()
  6.             Query.CommandText = ("SELECT codigo, producto, existencia, precio FROM productos")
  7.             Query.Connection = Conexion
  8.             Consultar = Query.ExecuteReader
  9.             While Consultar.Read
  10.                 Dim codigo As String = Consultar(0).ToString
  11.                 Dim producto As String = Consultar(1).ToString
  12.                 Dim existencia As String = Consultar(2).ToString
  13.                 Dim precio As String = Consultar(3).ToString
  14.                 'frmprincipal.datagrid.Refresh()
  15.             End While
  16.         Catch ex As Exception
  17.             MsgBox("Error " & ex.Message)
  18.         End Try
  19.     End Sub
  20.  

Todo va bien hasta que llega el momento de imprimir. He probado haciendo un While para que imprima todas las filas, pero no muestra nada  <_<
Si me pudieran dar una solución a mi código, o decirme otro camino para realizar esto se los agradecería! Me está dando dolor de cabeza no poder hacer eso.

Saludos y gracias por leer  :hola:

gabio2

  • Miembro MUY activo
  • ***
  • Mensajes: 402
  • Nacionalidad: mx
    • Ver Perfil
Re: Pasar datos de consulta a un Datagrid
« Respuesta #1 en: Domingo 13 de Marzo de 2011, 00:24 »
0
Cita de: "chevaz"
Hola! Antes que nada me presento: Soy chevaz, me llamo Sebastián  :lol: y soy algo así como un 'programador aficionado' de Visual Basic.NET. Me registré en éste foro porque pude notar que cada vez que Googleo para encontrar la solución a un problema sale un link a este foro.

Les cuento mi problema:
Estoy haciendo un simple controlador de Stock, para el kiosco de un vecino/amigo. Las bases de datos que utilizo son en MySQL, la conexión la he logrado y las consultas las hace, no tengo ningún problema en eso.
Mi problema se presenta al momento de imprmir los resultados de una consulta en un datagridview, la verdad me está dando dolor de cabeza ya  :hitcomp:

He probado varios ejemplos de otras personas y sus open-source, y he utilizado éste, ya que mi código no utiliza los DataSource o controles así.

Código: vb.net
  1. Public Sub grid()
  2.         Try
  3.             Conexion = New MySqlConnection()
  4.             Conexion.ConnectionString = Sql
  5.             Conexion.Open()
  6.             Query.CommandText = ("SELECT codigo, producto, existencia, precio FROM productos")
  7.             Query.Connection = Conexion
  8.             Consultar = Query.ExecuteReader
  9.             While Consultar.Read
  10.                 Dim codigo As String = Consultar(0).ToString
  11.                 Dim producto As String = Consultar(1).ToString
  12.                 Dim existencia As String = Consultar(2).ToString
  13.                 Dim precio As String = Consultar(3).ToString
  14.                 'frmprincipal.datagrid.Refresh()
  15.             End While
  16.         Catch ex As Exception
  17.             MsgBox("Error " & ex.Message)
  18.         End Try
  19.     End Sub
  20.  

Todo va bien hasta que llega el momento de imprimir. He probado haciendo un While para que imprima todas las filas, pero no muestra nada  <_<
Si me pudieran dar una solución a mi código, o decirme otro camino para realizar esto se los agradecería! Me está dando dolor de cabeza no poder hacer eso.

Saludos y gracias por leer  :hola:

Saludos, intenta primero declarando e instanciando un DataTable y ún objeto de tipo MySqlAdapter... ejemplo:

Código: vb.net
  1.  
  2. Dim _tabla As New DataTable
  3. Dim _Adaptador As New MySqlDataAdapter("SELECT * FROM PRODUCTO", Conexion) ' Conexion = a tu objeto de conexión donde tienes guardada tu cadena de conexión.
  4. _Adaptador.Fill(_tabla)
  5. DataGridView1.DataSource = _tabla
  6.  
  7.  

Espero te sirva :)...  saludos
@gabio87