Validation of Date with Reference to other fields 1

[logopolis]

I have a date field which I want to validate against four other date field in another table. I have combined the information in a query and sourced the information for the Form from that query. The date entered must be between Date1 and Date2 or Date3 and Date4. If it is not I need a message box to appear saying "Incorrect date range etc". Can anyone help.

John

 

[fneily]

I created an Unbound textbox, formatted as Short Date. Also a command button. Then I typed in a date, click the button to check for validity. Code on the Onclick event of the button is: Or you could put it on the AfterUpdate of the textbox

Private Sub Command12_Click()
If ((Me![DateBox].Value > Me![Date1].Value) And (Me![DateBox].Value < Me![Date2].Value)) Or ((Me![DateBox].Value > Me![Date3].Value) And (Me![DateBox].Value < Me![Date4].Value)) Then
Else
MsgBox "Not in Date Range." & Chr(13) & "Please reenter."
End If
End Sub