|
-
Aug 22nd, 2003, 02:35 AM
#1
Thread Starter
New Member
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
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|