Always Prompt to Save New or Edited Record 1

[capndave]

I have a form that opens via a choice of several command buttons; one opens to edit existing records the other opens in data entry for new records. There are several required fields, but not all need to be required. I want the user to be prompted to Save new record YES or NO in the data entry form regardless of how many fields are complete and I want the user to be prompted to save changes Yes or No when the form opens in the edit mode. These prompts need to occur when the user attempts to close either form via a command button on each form.

thanks

 

[missinglinq]

Try this in the code editor behind the appropriate forms.
The code will work for either AddMode or EditMode form, and will differentiate between the two with an appropriate message.

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 Record?", vbQuestion + vbYesNo + vbDefaultButton1, "Save This Record ???") = vbNo Then
  Me.Undo
 End If
End If
End Sub

The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!

 

[TheAceMan1]

Howdy missinglinq . . .

[blue]These prompts need to occur when the user attempts to close either form [purple]via a command button[/purple] on each form[/blue]

I was going to post the same, but the command button changed everything. The button allows the user to navigate to another record before actually hitting the button, and I'm sure you know what to expect.

If we remove the button your code works great, however I don't believe capndave intends to close the form for the 1st new or edited record . . .

Just thinking out loud ;-)

See Ya! . . . . . .

Be sure to see thread181-473997