-
Update
Hi,
I am trying to update my database through a dataset. My code is below, what do I set "drCurrent =" to select the current record
Thanks
Gary
Dim WithEvents bmb As BindingManagerBase
Private Sub Databind()
txtFirstName.DataBindings.Add("Text", tUsers, "userFirstName")
txtSurname.DataBindings.Add("Text", tUsers, "userSurname")
txtUsername.DataBindings.Add("Text", tUsers, "userUsername")
txtPassword.DataBindings.Add("Text", tUsers, "userPassword")
txtJobTitle.DataBindings.Add("Text", tUsers, "userJobTitle")
txtDateAdded.DataBindings.Add("Text", tUsers, "dateAddedToSystem")
With cbAccessLevel
.DisplayMember = "accessType"
.ValueMember = "accessID"
.DataSource = tAccessLevels
.DataBindings.Add("text", tAccessLevels, "accessType")
End With
bmb = Me.BindingContext(tUsers)
End Sub
Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
drCurrent = tUsers.
drCurrent.BeginEdit()
drCurrent("userFirstName") = txtFirstName.Text
drCurrent("userSurname") = txtSurname.Text
drCurrent("userUsername") = txtUsername.Text
drCurrent("userPassword") = txtPassword.Text
drCurrent("userAccessLevel") = cbAccessLevel.SelectedValue
drCurrent("userJobTitle") = txtJobTitle.Text
drCurrent.EndEdit()
da.Update(ds, "tblUsers")
MsgBox("Record edited successfully")
End Sub