Display picture dependant on date, regardless of year

[Icehousman2]

I have a report that needs to show a different picture with each seasonal change. One for summer, Spring, etc. Right now I have an IF then statement set up that tests the current date against predefined dates for the Seasonal changes.

If Date < #9/21/2004# then
blah blah

However, I want this function to work over a matter of years, and as you can see if the current date moves into 2005 then this code will no longer work. Is there a way to disregard the year, in these functions? Thank for the help in advance.

 

[pdx_man]

Try just referencing the month using either the Format function or the DatePart function. Check out their usage in Access Help.

 

[Icehousman2]

Thanks for the response, but I have already looked in access help and couldn't find a solution to this problem. Any more suggestions anyone?

 

[pdx_man]

You looked at the DatePart function?

Select Case [b]DatePart[/b]("m", Date)
    Case 11 To 2: MsgBox "It's Winter"
    Case 3 To 5: MsgBox "It's Spring"
    Case 6 To 8: MsgBox "It's Summer"
    Case 9,10: MsgBox "It's Fall"
End Select

Again, look in Access Help for it's usage.

 

[Icehousman2]

Thanks, I was hoping to use both the day and the month to get this as accurate as possible, but I'm having a hell of a time getting that to work, so maybe i will just use the month. Thanks for the help.

 

[pdx_man]

Then use the Format function:

Format(Date, "MMDD")

 

[Icehousman2]

How would you do a conditional test with this type of format? Can you give me an example? And i'm in Seattle. Not that it matters, but I just noticed you are from Portland.

 

[Icehousman2]

Nevermind, Got it to work. Thanks for the help PDX MAN.