Foros aprenderaprogramar.com

Aprender a programar => C, C++, C#, Java, Visual Basic, HTML, PHP, CSS, Javascript, Ajax, Joomla, MySql y más => Mensaje iniciado por: knife85 en 21 de Octubre 2020, 21:28

Título: Visual Basic pasar datos desde datagridview a base de datos Access SqlCommand
Publicado por: knife85 en 21 de Octubre 2020, 21:28

Buenas. Nuevo problema a solucionar. Tengo un DatagridView que lleno con diferentes productos valores y la quiero pasar a una base de datos de access mismas cantidad de columnas y todo

Estuve buscando por todos lado pero no la puedo hacer funcionar ¬¬

Y no sé ni como empezar

AYUDAAA!!!!!!!!!!!!!!

Título: Re:Visual Basic, pasar de un datagridview a una base de datos
Publicado por: knife85 en 22 de Octubre 2020, 21:21

Un poco mas de info para ver si alguien se le ocurre algo

Es un sistema de facturacion
El "DataGridView1" tiene 5 columnas "Nfactura /cantidad /Producto /PrecioUni / Total"

el DataGridView1 lo lleno con varias filas (varios productos)
y despues mando a imprimir

Lo que necesito es que esos datos del DGV se guarden en una base de datos "yulenDataSet" en al Tabla "Tbl_registros"

Título: Re:Visual Basic pasar datos desde datagridview a base de datos Access SqlCommand
Publicado por: Ogramar en 22 de Octubre 2020, 21:36

Buenas, no es exactamente lo que quieres, pero este código de ejemplo de transferir datos de un datagridview a una base de datos a lo mejor te da alguna pista

Código: [Seleccionar]

Imports System.Data.SqlClient
Public Class Form1
    Dim sCommand As SqlCommand
    Dim sAdapter As SqlDataAdapter
    Dim sBuilder As SqlCommandBuilder
    Dim sDs As DataSet
    Dim sTable As DataTable

    Private Sub load_btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles load_btn.Click
        Dim connectionString As String = "Data Source=.;Initial Catalog=pubs;Integrated Security=True"
        Dim sql As String = "SELECT * FROM tienda"
        Dim connection As New SqlConnection(connectionString)
        connection.Open()
        sCommand = New SqlCommand(sql, connection)
        sAdapter = New SqlDataAdapter(sCommand)
        sBuilder = New SqlCommandBuilder(sAdapter)
        sDs = New DataSet()
        sAdapter.Fill(sDs, "tienda")
        sTable = sDs.Tables("tienda")
        connection.Close()
        DataGridView1.DataSource = sDs.Tables("tienda")
        DataGridView1.ReadOnly = True
        save_btn.Enabled = False
        DataGridView1.SelectionMode = DataGridViewSelectionMode.FullRowSelect

    End Sub

    Private Sub new_btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles new_btn.Click
        DataGridView1.[ReadOnly] = False
        save_btn.Enabled = True
        new_btn.Enabled = False
        delete_btn.Enabled = False
    End Sub

    Private Sub delete_btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles delete_btn.Click
        If MessageBox.Show("¿Quiere borrar esta fila?", "Delete", MessageBoxButtons.YesNo) = DialogResult.Yes Then
            DataGridView1.Rows.RemoveAt(DataGridView1.SelectedRows(0).Index)
            sAdapter.Update(sTable)
        End If
    End Sub

    Private Sub save_btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles save_btn.Click
        sAdapter.Update(sTable)
        DataGridView1.[ReadOnly] = True
        save_btn.Enabled = False
        new_btn.Enabled = True
        delete_btn.Enabled = True
    End Sub
End Class

Salu2