★简单的有关问题，高高的分！取月末日期的有关问题！

★★★简单的问题，高高的分！！！取月末日期的问题！★★★
我想取每个月的月末的日期！

比如：
2007年5月                     得到数字为：31
2007年4月                     得到数字为：30
2007年2月                     得到数字为：28
2008年2月                     得到数字为：29

要求：
1、日期要考虑到，润年问题。要求是一个任何时间都可以使用的万能代码。
2、要求用ASP语言来做，不要JS的！

谢谢各位大侠呀！

------解决方案--------------------
function lastday(curDate)
select case Month(curMonth)
case 1,3,5,7,8,10,12
lastday = 31
case 4,6,9,11
lastday = 30
case 2
if isdate(year(curDate) & "- " & month(curDate) & "-29 ") then
lastday = 29
else
lastday = 28
end if
case else
lastday = -1
end function

response.write lastday(date())
------解决方案--------------------
有一个简单的方法，只要求出 下一个月份的第一天 的前一天，然后取day就可以了
------解决方案--------------------
有一个简单的方法，只要求出 下一个月份的第一天 的前一天，然后取day就可以了
function gettype(thisdate)
if month(thisdate) <> 12 then
gettype=day(cDate(cDate(year(thisdate) & "/ " & month(thisdate)+1 & "/1 ")-1))
else
gettype=31
end if
end function