How to save or Undo a Form when using acAdd in DoCmd.OpenForm.....

[tmartin]

DoCmd.OpenForm "NewTransaction", acNormal, "Query4TransactionForm", "[EmployeeID]=[TempVars]![loginID]", acAdd, acNormal



When I implement the DoCmd as shown above, an blank form is presented that can be populated. If I edit the content and then close the form,
the database is updated. Is there anyway to cancel what you have edited? Is there anyway to manually save the form?

My Workaround -
I created an unbounded form and then called a VBA sub to read the content of the form and create a new record in the database. I am just wondering
about the procedure above if there is a way to control updating the database

[pbaldy]

In general, an unbound form gives you the most control. There are some thoughts here:

http://www.baldyweb.com/BoundUnbound.htm

You can probably abort the record saving on a bound form with the Undo method, probably called from the form's before update event.

[Missinglinq]

...Is there anyway to cancel what you have edited? Is there anyway to manually save the form?

To Cancel a New Record or Edit of Record

Private Sub Form_BeforeUpdate(Cancel As Integer)
If Not (Me.NewRecord) Then
  If MsgBox("Would You Like To Save The Changes To This Record?", vbQuestion + vbYesNo + vbDefaultButton1, "Save Changes to Record ???") = vbNo Then
   Me.Undo
  End If
Else
  If MsgBox("Would You Like To Save This New Record?", vbQuestion + vbYesNo + vbDefaultButton1, "Save This New Record ???") = vbNo Then
   Me.Undo
  End If
End If
End Sub

To Save a Record

Private Sub cmdSaveRecord_Click()
 DoCmd.RunCommand acCmdSaveRecord
End Sub

Linq ;0)>