asp下闰年计算方法-ASP教程,ASP应用

计算闰年主要是为了判断2月份的天数，一般闰年2月份是29天，平年2月份是28天。计算闰年的算法非常简单，即：能被400整除，或者能被4整除而不能被100整除。

算法如下：

 function isleapyear(pyear)
    set oreg=new regexp
    oreg.pattern=”^\d{4}$”
    if not oreg.test(pyear) then
        isleapyear=false
        exit function
    end if
    oyear=clng(pyear)
    if ((oyear mod 4=0 and oyear mod 100<>0) or oyear mod 400=0) then
       isleapyear=true
    else
       isleapyear=false
    end if
 end function