Mega Code Archive

 

Categories / VisualBasic Script / Forms

 

Code for the Add Button

Private Sub cmdAdd_Click()     'Add a new row to the recordset     Me.Recordset.AddNew     Me.Recordset("CompanyName") = "New Company"     Me.Recordset.Update     'Move to the row that was added     Me.Bookmark = Me.Recordset.Bookmark End Sub