validate checkbox when saving a record/form

[twpt]

Hi everyone,

I studied a bit of Database design many many years ago at uni so know a little bit but am pretty rusty. I have built a new client database and have a question on a (fairly) simple task.

I have a checkbox on a form (essentially a disclaimer). I would like to have a pop up that appears if you try to save the form without checking the box. Similar to a box that asks you to agree to terms and conditions before clicking ok on a website.

Any help massively appreciated.

Thanks,



ed

[pbaldy]

I'd use the before update event of the form:

http://www.baldyweb.com/BeforeUpdate.htm

[Missinglinq]

The Form_BeforeUpdate is the correct event for this, of course, and your code will work for most Controls, but it won't work for a Checkbox Control. That's because a Checkbox has an Access defined Default of Zero (0). For a Checkbox you'd need check for a Value of -1, with something like this:

Private Sub Form_BeforeUpdate(Cancel As Integer)
If Me.Disclaimer <> -1 Then
  MsgBox "You need to Tick the Disclaimer  Box"
  Cancel = True
  Me. Disclaimer.SetFocus
End If
End Sub

Linq ;0)>

[twpt]

Brilliant stuff guys, thanks a lot. I put the code in the on click event on the save button in the end, as if i put it in the form it caused a problem when you closed the form. The msg box would show, but not allow you to change the status of the checkbox. Seems to work fine on the save button.

Many Thanks, has saved me a load of time.

[Missinglinq]

Brilliant stuff guys, thanks a lot. I put the code in the on click event on the save button in the end, as if i put it in the form it caused a problem when you closed the form. The msg box would show, but not allow you to change the status of the checkbox. Seems to work fine on the save button.

Sorry, but that makes no sense, on several counts!


To begin with, if the code was used in the Form_BeforeUpdate event, there is no reason for you not be be able to tick the Checkbox. One of the points in having the Validation code in this event is that it will work regardless of whether the user moves to another Record, closes the Form or closes Access, itself.

What, exactly, does your 'Save' button do? Such a button, in Access, is unnecessary, the Record being automatically saved when the Record is moved off of, and frequently ends up causing trouble. If you must have one, it should either merely move to a New Record or Close the Form.

Secondly, you cannot use the Cancel event with the OnClick Event of a Command Button; it has no Cancel event. This means that although you'll see the message, the Record will still be saved, with the Checkbox unticked.

Linq ;0)>