Save changes code, prevent you can't save record error

/ Published in: Visual Basic
Save to your folder(s)

Copy this code and paste it in your HTML
  1. Private Sub Form_BeforeUpdate(Cancel As Integer)
  2. If MsgBox("Save changes?", vbQuestion + vbYesNo) = vbNo Then
  3. Cancel = True
  4. End If
  5. End Sub
  7. Private Sub Form_Error(DataErr As Integer, Response As Integer)
  8. If DataErr = 2169 Then
  9. Response = acDataErrContinue
  10. End If
  11. End Sub

Report this snippet


RSS Icon Subscribe to comments

You need to login to post a comment.