Merhaba;

DataGridView dan veritabanına veri kaydede biliyorum. Ancak verileri güncelleme işlemi yapamıyorum. DataGird te görünen tüm verileri tekrar veritabanına yazıyor. Kullanmış olduğum kod aşağıdaki gibidir;

Try

            baglanti.Open()

            Dim sorgu As String

            For a = 0 To DataGridView1.RowCount - 1

                sorgu = ("INSERT INTO donemler(donemler) values ('" & DataGridView1.Rows(a).Cells(1).Value.ToString() & "' )")

                Dim kaydet As OleDbCommand = New OleDbCommand(sorgu, baglanti)

                kaydet.ExecuteNonQuery()

            Next

            baglanti.Close()

            DataGridView1.RowCount = Nothing

            DataGridView1.Refresh()

        Catch ex As Exception

            baglanti.Close()

        End Try

Burada sanırım veri kaydı ve veri güncelleme için farklı bir yol izlemek gerekiyor ancak bir türlü bulamadım. Örnek çalışma ektedir.
Yardımcı olanlara şimdiden teşekkür ederim.

eklemek için : INSERT......
Güncelleme için : UPDATE.....

yapmanız gerekiyor.

Mevlüt hocam;

Dediğiniz gibi yaptım ancak bir türlü olmadı. Update komutunu örnekteki koduma uyarladım. Hata vermiyor ancak bir işlemde yapmıyor. Neyden olduğunu anlayamadım.

benim kodlarım bunlar

Try
            Sql = "Update tbl_Cekler SET alistarihi='" & txtalistarihi.Text & "', evrturu='" & txtevrturu.Text & "', kimden='" & txtkimden.Text & "', bankaadi='" & txtbankaadi.Text & "', subeadi='" & txtsubeadi.Text & "', vadetarihi='" & txtvadetarihi.Text & "', cekno='" & txtcekno.Text & "', hesapno='" & txthesapno.Text & "', tutar='" & txttutar.Text & "', notu='" & txtnot.Text & "', kaydeden='" & txtkaydeden.Text & "', drm='" & txtdrm.Text & "'   WHERE cno =" & txtcno.Text & ""

          
            ConnDB()
            cmd = New OleDbCommand(sqL, conn)
            Dim i As Integer
            i = cmd.ExecuteNonQuery
            If i > 0 Then
                cmd.Dispose()
                conn.Close()
                 MsgBox(" Güncelleme Yapılmıştır..", MsgBoxStyle.Critical, "Güncelleme")
            Else
              
                MsgBox(" Güncelleme başarısız oldu..", MsgBoxStyle.Critical, "Güncelleme")
            End If
        Catch ex As Exception
            MsgBox(ex.Message & " Modül : frm_Cekler - Güncelletbl_Cekler ")
        Finally
            cmd.Dispose()
            conn.Close()
        End Try

Mevlüt hocam;

TextBox ile bu kodladan bende yapabiliyorum sıkıntı olmuyor.
Ancak Bu işlemi ben DataGridView da yapmak istiyorum. Veri ekleme / Güncelleme işlemini TextBox lardan değil DataGirdView üzerinden yapmak istiyorum.
TextBox ta kullandığım Update komutuda DataGridView dan yaptığımda işlemi yapmıyor.

Try

            baglanti.Open()

            Dim sorgu As String

            For a = 0 To DataGridView1.RowCount - 1

                sorgu = ("UPDATE donemler SET  donemler='" & DataGridView1.Rows(a).Cells(1).Value.ToString() & "' WHERE sira='" & DataGridView1.Rows(a).Cells(0).Value.ToString() & "'  )")

                Dim kaydet As OleDbCommand = New OleDbCommand(sorgu, baglanti)

                kaydet.ExecuteNonQuery()

            Next

            baglanti.Close()

              Catch ex As Exception

            baglanti.Close()

 End Try

Kodu bu şekilde düzenlediğimde kod ile ilgili bir hata vermiyor ancak herhangi bir işlemde yapmıyor.
İnternette bir iki yazı okudum onlarda DataSet kullanmak gerektiğini yazmışlar ancak herhangi bir örnek kodlama bulamadım.

sayın ustaoglu,

bahsettiğiniz talebinize yönelik olarak;

Try

        baglanti.Open()

        Dim sorgu As String

        For a = 0 To DataGridView1.RowCount - 1

        sorgu = "UPDATE donemler SET  donemler = '" & DataGridView1.Rows(a).Cells(1).Value.ToString() & "'' where sira='" & DataGridView1.Rows(a).Cells(0).Value.ToString() & "'"

        Dim cmd As New OleDbCommand(sorgu, baglanti)

        cmd.ExecuteNonQuery()

            Next

            baglanti.Close()

              Catch ex As Exception

            baglanti.Close()

 End Try

yukarıda yazılı kodları deneyiniz.

NOT
alan adlarında eğer METİN Veri Türü ise KESME İŞARETİ (')  kullanınız fakat eğer SAYI ise kullanmayınız.

bilginize...iyi çalışmalar,saygılar.