●在ASP中如何得到某月的最大天数?
如题，在ASP中如何得到某月的最大天数?
如：1月是31天
2月可能是28天，也有可能是29天
3月又是31天
4月是30天…
问题点数：10、回复次数：10Top
1 楼gdwebinfo2（gdwebinfo2）回复于 2006-03-06 19:59:47 得分 0
有高手知道吗/Top
2 楼kafly（王者）回复于 2006-03-06 22:14:01 得分 0
呵呵，算一下撒。懒人！
没有这样的函数的Top
3 楼wtogether（wtogether）回复于 2006-03-06 22:19:45 得分 0
1,3,5,7,8,10,12是31
4,6,9,11是30天
2月最大28天
Top
4 楼ksn520（泡菜.Net）回复于 2006-03-07 08:36:56 得分 0
自己写用 wtogether(wtogether)说的
function getmonthmax(m)
select case m
case 1,3,5,7,8,10,12
getmonthmax = 31
....
end select
end function
还有闰年问题，你再用个if 来判断
if yeah(日期) mod 4 = 0 then
28
end if
______________________________________________
我最讨厌两种人：
一是有种族歧视的；
二是黑人；
三是不识数的！Top
5 楼baiyunfei（虚度残生）回复于 2006-03-07 08:43:46 得分 0
theYear="2006"
theMonth="3"
dayNum=Day(DateAdd("d",-1,DateAdd("m",1,Cdate(theYear & "-" & theMonth & "-1"))))Top
6 楼lovebeyondforever（我不信）回复于 2006-03-07 09:54:28 得分 2
<%
Function MaxMonth(m , y)
Select Case m
Case 1, 3, 5, 7, 8, 10, 12
Response.Write ("此月有31天")
Case 4, 6, 8, 11
Response.Write ("此月有30天")
Case 2
If y Mod 400 = 0 Or (y Mod 4 = 0 And y Mod 100 <>0) Then
Response.Write("此月有29天")
Else
Response.Write("此月有28天")
End If
End Select
End Function
Call MaxMonth(2,2006)
%>Top
7 楼tokilcoom（痴迷白骨）回复于 2006-03-07 09:58:13 得分 0
markTop
8 楼superdullwolf（超级大笨狼,每天要自强,MVP）回复于 2006-03-07 09:59:52 得分 8
下个月的第一天减去1天
<SCRIPT LANGUAGE="vbScript">
alert cdate("2006-3-1")-1
</SCRIPT>Top
9 楼slayerbb（名字被抢了）回复于 2006-03-07 10:07:07 得分 0
re
sp 楼上的最简算法Top
10 楼ksn520（泡菜.Net）回复于 2006-03-07 10:25:00 得分 0
superdullwolf(超级大笨狼,每天要自强,MVP)
这个强死-_-!
______________________________________________
我最讨厌两种人：
一是有种族歧视的；
二是黑人；
三是不识数的！Top
