Open Form to new Record and don't save

[JPR]

Hello friends, back for some other useful help.
On a form I have placed a button to go to a new records: DoCmd.GoToRecord , , acNewRec.
It cold happen that users don't want to save this entry or accidentally erroneously clicked on the New Records Button.
Is there a way, you can recommend me to avoid this? Maybe some code that checks if no data has been entered, closed the forms without saving it. Thank you

 

[arnelgp]

the safest way is to use Transaction to your form.

 

[JPR]

Thank you. But honestly I have never heard about it.

 

[Gasman]

Thank you. But honestly I have never heard about it.

Google?

 

[JPR]

Will try. Thank you

 

[Uncle Gizmo]

Your question reminded me of a previous question on the forum which I answered here:-

Move Info from One Table to Another - Nifty Access

Move Info from One Table to Another A brief summary summary of the "OP's" (Original Posters) question HERE. I've done a set of YouTube videos to answer the question. The first answer demonstrates the INSERT INTO method of adding records to another table. This method is where you update the...

www.niftyaccess.com

Extract:-
The method sets the textbox default value. Now you can see the information and vet it without saving it to the table.

This method allows you to open a form, ready to enter a new record with some of the text boxes already filled with information. The user can then update the text. The action of making an update to the text saves the record, your changes, and the "default values".

 

[Gasman]

Will try. Thank you

If you do not want to investigate/use the transaction method, then research the Form BeforeUpdate event.

 

[missinglinq]

Using transactions seems a bit of overkill. I agree with Gasman...and always use this

Private Sub Form_BeforeUpdate(Cancel As Integer)
  If Me.NewRecord Then
      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

Linq ;0)>

 

[JPR]

Thank you for your great help.