Date comparison (drives me mad)

[TOPSie]

If rs!DeliveryDate = wtestdate

rs!DeliveryDate is a field read from the database defined as Date
wTestDate is a local variable defined as Date

execute the code and break in this line
rs!Feliverydate has a value of 27/09/2023
wtestdate has a value of 27/09/2023__08:30:00

the comparison fails.

All I want to do is check if it is the same Day -the time is irrelvant

I hate SQL/Access date handling - just when I think I understand it all goes pear shaped again

[Minty]

Use the date value expression:

If rs!Deliverydate = DateValue(wTestDate)

That strips the time value (which every date has, it's just hidden because its 0 which represents 12:00 midnight in your delivery date) from your date value.

All Dates are stored as decimal numbers - The whole number represents the day, the decimal portion is the time. You can see this in the immeditate window:

Print now(),cdec(Now()) , Date(), cdec(Date())
05/10/2023 09:13:57          45204.3846875              05/10/2023     45204

When you store just the date the value is 45204.0000 for today. Compare that to the value with any actual time component and the comparison fails.

[Welshgasman]

I can understand the recordset field having a time element and the local variable not, but the other way around??

[TOPSie]

Many thanks

[Micron]

I can understand the recordset field having a time element and the local variable not, but the other way around??

A wild guess: the date field is formatted that way so the recordset uses the format. The date variable uses the field value, not the format.
I don't have time to test that any time soon. If you had asked me what the recordset would return I would have said the value, not the format.