ASP获取当月天数函数的方法:
1、首先使用year(),month()函数获取该月的年份、月份。假设给出的日期为tDate,那么dt1 = CDate(Year(tDate) & "-" & Month(tDate) & "-1")便是该月的第一天。
2、使用DateAdd函数获得下一个月的第一天,即dt2 = DateAdd("m",1,dt1)。
3、dt2与dt1相差的天数,即为当月的天数。即DateDiff("d",dt1,dt2)。
<% Function GetMonthDays(tDate) dt1 = CDate(Year(tDate) & "-" & Month(tDate) & "-1") ' 得到本月第一天 dt2 = DateAdd("m",1,dt1) ' 得到下个月第一天 GetMonthDays=DateDiff("d",dt1,dt2) ' 得到两个月的差 End Function %>
或:
<% '函数名:findDays '作 用:返回给定年月得当月天数 '参 数:yy 年份 mm 月份 '返回值:当月天数 function findDays(yy,mm) dt=dateSerial(yy,mm,1) findDays=datediff("d",dt,dateadd("m",1,dt)) end function
调用:response.write findDays("2008","01") %>
或者:
<% dd = Date() '今天 dd = dateadd("m",1,dd) '月份加1 dd = Cdate(Year(dd) & "-" & Month(dd) & "-1") '下月的第一天 dd=dateadd("d",dd,-1) '本月的最后一天 dd=day(dd) '本月的天数 Response.Write(dd) %> |