DayConstants HELP!

  • Thread starter Thread starter Ivan Palèiæ
  • Start date Start date
I

Ivan Palèiæ

Hi
i need a bit of help, the problem is next:
i have in my form date field so after i entered the date i want that access
only warns me if the day in a date i entered isn't saturday and goes on. I
wrote the following code but the problem is that when i enter the Saturday's
date it also gives me a warning that it isn't Saturday.
Thanx in advance

Private Sub EndDate_AfterUpdate()
Dim EndDate As Date
EndDate = Forms!Table1!EndDate.Value
If EndDate = DayConstants.mvwSaturday Then
Exit Sub
Else: MsgBox "Day you entered isn't Saturday!", vbExclamation + vbOKOnly,
"Information"
End If
End Sub
 
Back
Top