Best way to handle non-insert

[aytee111]

I have a form where the user can select an item, the form filters and the record is displayed. There is a "New" button for them to add a new record, this does DoCmd.GoToRecord,,,acNewRec. They enter the information and click on an "Add" button which does a whole bunch of stuff. However, if they go direct from the "New" button to selecting an item (without clicking Add), errors occur - in this case some required fields haven't been entered.

I would like to be able to intervene and cancel the insert, same as user hitting 'esc', but I haven't been able to figure out where or how to handle this.



Any help would be appreciated.

[davegri]

I've used something like this. This is modified a bit to remove some of my application specific code, so it's untested as is.

Private Sub Form_BeforeUpdate(Cancel As Integer)
    Select Case Me.NewRecord
        Case True
		'check global var or tempvar set when ADD button clicked (ADD Flag)
               If fcnAddHasBeenClicked = true then
			'Clear the ADD flag here
			Exit Sub
		Else               
	               'various fields that need to be blanked
			cboucFrom.Undo
	                cboucTo.Undo
	                Me.Undo
	                Cancel = True
		end if	 
        Case False   'existing record being changed
    End Select
'Clear the ADD  Flag here...
End Sub

[RuralGuy]

How about disabling the "New" button until the user has clicked the "add" button?

[aytee111]

RuralGuy - incorrect sequence of events.

davegri - thanks, I will try that.

[aytee111]

This code is run immediately the Add button is clicked, so I cannot add a new record as it cancels the new record as soon as I click on Add.

Solution: added the Select Case/Me.Undo in the AfterUpdate event of the selection combobox.