D
DV
I entered the folloing in the BeforeUpdate of a form:
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim iAns As Integer
iAns = MsgBox("Are you sure you want to change this record? Hit ESC to undo
changes", vbYesNo)
If iAns = vbNo Then
Cancel = True
End If
End Sub
When I'm prompted (YES/NO) to change the record, if I select "NO" I get a
second message - This Recordset is not updateable - with an OK button. How
can I either elimnated this, or change the message to read "Record Not
Updated".
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim iAns As Integer
iAns = MsgBox("Are you sure you want to change this record? Hit ESC to undo
changes", vbYesNo)
If iAns = vbNo Then
Cancel = True
End If
End Sub
When I'm prompted (YES/NO) to change the record, if I select "NO" I get a
second message - This Recordset is not updateable - with an OK button. How
can I either elimnated this, or change the message to read "Record Not
Updated".