Number of days in a given month

Good day,

I had a request from someone to add choices in the list of pre-defined date ranges. She asked me for something like "Last x Months" and "x Months ago [MonthName]", where x can vary from 2 to 6, "Current Month, Last Month and Last Month (Rolling)" being already available.

This is what I'm doing at this moment, however I noticed that the formula used to return the last day of a given month isn't right.

The formula, in the "Calendar.asp" file reads as follow :

intDaysInMonth = Day(DateAdd("d", 0 - Day(datCurrent), DateAdd("m", 1, datCurrent)))

For instance, it returned 30 days for May, and there should be 31.

I replaced it with the following :

intDaysInMonth = Day(DateAdd("d", -1, DateSerial(datYear, datMonth + 1, 1)))

Please verify if this "fix" is necessary for you version, simply by clicking on the calendar icon and confirming if it presents the proper amount of days.

For your information, the line to be fixed, at least in my case, was around line 50.

Note: There might be other ways to achieve a similar calculation, however the one suggested above has proven to be working for a quite a substantial period of time. I created it few years ago when I was doing a project with Access and VBA.

Regards.