Actualizar datagrid en tiempo de ejecucion.

[kloud100]

Hola

Esta vez solicito la ayuda de los miembros del foro con una duda que tengo respecta al uso de datagrids en visual basic.net, la cual consiste en lo siguiente:

Tengo una aplicacion en visual basic.net para una pda en la cual el usuario introduce 3 datos en campos de texto y al presionar un boton estos se deben almacenar en una tabla (lo cual funciona perfectamente), en la misma pantalla tengo un datagrid en el que se muestran los datos que ya existen en la tabla, pero necesito que al guardar los datos tecleados por el usuario en los campos de texto, se actualize la informacion contenida en el datagrid.

En pocas palabras necesito actualizar mi datagarid en tiempo de ejecucion, si alguien puede ayudarme se lo agradeceria.

[agressor]

Hola puedes crear una funcion que te llene el DataGrid y luego cuando haga algun cambio te lo llene.. te pongo un ejemplo de una que yo utilizo..

Public Sub LlenarGrid(ByRef nombregrid As DataGridView)
Dim conn As New System.Data.Odbc.OdbcConnection(My.Settings.CnxDB)
Dim myCommand As New System.Data.Odbc.OdbcCommand
Dim myAdapter As New System.Data.Odbc.OdbcDataAdapter
Dim myData As New DataSet
Dim SQL As String

SQL = ""

myCommand.Connection = conn
myCommand.CommandText = SQL

myAdapter.SelectCommand = myCommand
myAdapter.Fill(myData, "Tabla")
nombregrid.DataSource = myData.Tables(0)
End Sub

Salu2..!! Prueba y me cuentas..

[kloud100]

Hola agressor

Gracias por la respuesta, sin embargo soy no vato en el manejo de bases de datos, por lo que te agradeceria si me pudieses explicar mejor el procedimiento que sigues para llenar el datagrid, cabe mencionar que la base de datos la manejo en sql server ce.

De antemano agradesco la ayuda.

[agressor]

Hola pues mira para llenar el Datagrid usas una conexion ODBC me equivoco..?!

Entonces

Public Sub LlenarGrid(ByRef nombregrid As DataGridView)
Dim conn As New System.Data.Odbc.OdbcConnection(Conexion) <- String de conexion
Dim myCommand As New System.Data.Odbc.OdbcCommand
Dim myAdapter As New System.Data.Odbc.OdbcDataAdapter
Dim myData As New DataSet
Dim SQL As String

SQL = "" <- SQL que el cual te llenara la tabla

myCommand.Connection = conn
myCommand.CommandText = SQL

myAdapter.SelectCommand = myCommand
myAdapter.Fill(myData, "Tabla") <- Tabla nombre de la tabla
nombregrid.DataSource = myData.Tables(0)<- Nombre del Grid
End Sub

Aqui lo unico que debes hacer es especificar la conexion y el SQL que quieres que te llene el DataGrid, la conexion y el Datagrid que vas a llenar..

Esto lo puedes colocar como funcion publica en tu formulario y luego la llamas en el evento OnClick del boton que te hace la funcion especificando el nombre del DataGrid

Salu2.!!

[Avellaneda]

Iniciado por kloud100

Hola agressor

Gracias por la respuesta, sin embargo soy no vato en el manejo de bases de datos, por lo que te agradeceria si me pudieses explicar mejor el procedimiento que sigues para llenar el datagrid, cabe mencionar que la base de datos la manejo en sql server ce.

De antemano agradesco la ayuda.

Aquí tienes otra opción conectando con OLEDB:

Código:

Imports System.Data.OleDb

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim cn As New OleDbConnection("Aqui tu cadena de conexión")
        Try
            Dim da As New OleDbDataAdapter("SELECT * From LaTabla", cn)
            Dim ds As New DataSet

            da.Fill(ds, "0")
            With DataGridView1
                .DataSource = ds.Tables("0")
                .Refresh()
            End With
        Catch ex As Exception
            MsgBox(ex.Message.ToString)
        Finally
            If cn.State = ConnectionState.Open Then
                cn.Close() ' cierra la conexión
            End If
        End Try
    End Sub

End Class

[kloud100]

Hola

Gracias a ambos, sus respuestas me fueron de mucha ayuda.