I'm using this code for update:
Code: Select all
Private Sub frmTest_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MyCon.Open()
Me.MyDa1.Fill(Me.DsTest1.nieuws)
End Sub
Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click
Me.MyDa1.Update(Me.DsTest1.nieuws)
End Sub