Bagaimana cara menyimpan perubahan dari DataGridView ke database?

Saya ingin menyimpan perubahan yang dilakukan pada DataGridView ke dalam database MS SQL CE, tetapi saya tidak bisa, perubahan tidak disimpan ke database....

Ini kodenya (VB.net):

    Private Sub Form1_Load(ByVal sender As System.Object, 
        ByVal e As System.EventArgs) handles MyBase.Load

        Dim con As SqlCeConnection = New SqlCeConnection(@"Data  Source=C:\Users\utente\Documents\test.sdf")

        Dim cmd As SqlCeCommand = New SqlCeCommand("SELECT * FROM mytable", con)

        con.Open()
        myDA = New SqlCeDataAdapter(cmd)
        Dim builder As SqlCeCommandBuilder = New SqlCeCommandBuilder(myDA)
        myDataSet = New DataSet()
        myDA.Fill(myDataSet, "MyTable")
        DataGridView1.DataSource = myDataSet.Tables("MyTable").DefaultView
        con.Close()
        con = Nothing

    End Sub



    Private Sub edit_rec()

        Dim txt1, txt2 As String
        Dim indice As Integer = DataGridView1.CurrentRow.Index

        txt1 = DataGridView1(0, indice).Value.ToString '(0 is the first column of datagridview)
        txt2 = DataGridView1(1, indice).Value.ToString '(1 is the second)        MsgBox(txt1 + "  " + txt2)
        '
        DataGridView1(0, indice).Value = "Pippo"
        DataGridView1(1, indice).Value = "Pluto"
        '
        Me.Validate()
        Me.myDA.Update(Me.myDataSet.Tables("MyTable"))
        Me.myDataSet.AcceptChanges()
        '
    End Sub

Terima kasih atas saran apa pun.


vb.net datagridview
person Pierre Minesso    schedule 23.08.2013    source sumber

Jawaban (3)


arrow_upward
0
arrow_downward

Anda perlu menggunakan myDA.Update, yang akan melakukan perubahan. Hal ini karena setiap perubahan yang Anda buat dilakukan pada instance lokal dari kumpulan data tersebut. Dan karena itu dibuang sama seperti variabel lainnya.

... Saya dapat melihatnya di sub edit_rec Anda, tetapi apa maksudnya - tidak ada apa pun di kode yang Anda posting.

person guyh92    schedule 23.08.2013

arrow_upward
0
arrow_downward

Mungkin sedikit terlambat.

Dalam acara Pemuatan formulir, Anda membuka dan menutup koneksi. Dan lebih jauh lagi, semuanya adalah variabel lokal yang kehilangan nilai atau data apa pun saat keluar dari sub

Public Class Form1



        Dim con As SqlCeConnection

        Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

            con = New SqlCeConnection(@"Data  Source=C:\Users\utente\Documents\test.sdf")

            Dim cmd As SqlCeCommand = New SqlCeCommand("SELECT * FROM mytable", con)

            con.Open()
            myDA = New SqlCeDataAdapter(cmd)
            Dim builder As SqlCeCommandBuilder = New SqlCeCommandBuilder(myDA)
            myDataSet = New DataSet()
            myDA.Fill(myDataSet, "MyTable")
            DataGridView1.DataSource = myDataSet.Tables("MyTable").DefaultView
            cmd.Dispose()

        End Sub

***Put the closing of connection here instead or somewhere else suitable when you don't use it anymore***

        Private Sub Form1_FormClosed(sender As Object, e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed

            con.Close()
            con = Nothing

        End Sub

        Private Sub edit_rec()

            Dim txt1, txt2 As String
            Dim indice As Integer = DataGridView1.CurrentRow.Index

            txt1 = DataGridView1(0, indice).Value.ToString '(0 is the first column of datagridview)
            txt2 = DataGridView1(1, indice).Value.ToString '(1 is the second)        MsgBox(txt1 + "  " + txt2)
            '
            DataGridView1(0, indice).Value = "Pippo"
            DataGridView1(1, indice).Value = "Pluto"
            'You code to update goes here and not in my scope of answer

       End Sub

    End Class
person user3571272    schedule 25.04.2014

arrow_upward
0
arrow_downward

Saya rasa Anda ingin menambahkan @ dengan string koneksi Anda

SqlConnection con;

      con = New SqlConnection(@"Data  Source=C:\Users\utente\Documents\test.sdf");
person Kishan    schedule 11.09.2014