monthlist.vm
来自「webwork source」· VM 代码 · 共 95 行
VM
95 行
#bean("webwork.util.Timer" $timer)<HTML><BODY><H1>This year</H1>#bean("webwork.util.DateFormatter" $monthformat)#set ($monthformat.parseFormat = "M")#set ($monthformat.format = "MMMMMMM")#bean ("webwork.util.DateFormatter" $format)#set ($format.parseFormat = "d")#set ($format.format = "EEEE")#bean ("webwork.util.Counter" $monthcounter)$monthcounter.setFirst($webwork.toLong(1))$monthcounter.setLast($webwork.toLong(12))#foreach ($monthnr in [0..11]) #action ("MonthList" $month) $month.setMonth($monthnr) #execute($month)<TABLE BORDER=1 CELLSPACING=0 CELLPADDING=2><TR><TH> </TH><TH COLSPAN=7>$monthformat.setDate($webwork.toString($monthcounter.next))$monthformat.formattedDate</TH></TR><TR><TH>Week</TH>#bean ("webwork.util.Counter" $day)$day.setFirst($month.firstDay)$day.setInterval($webwork.toLong("86400000"))$format.setTime($day.next)<TH>$format.formattedDate</TH>$format.setTime($day.next)<TH>$format.formattedDate</TH>$format.setTime($day.next)<TH>$format.formattedDate</TH>$format.setTime($day.next)<TH>$format.formattedDate</TH>$format.setTime($day.next)<TH>$format.formattedDate</TH>$format.setTime($day.next)<TH>$format.formattedDate</TH>$format.setTime($day.next)<TH>$format.formattedDate</TH></TR>#bean ("webwork.util.Counter" $week)$week.setFirst($webwork.toLong(1))$week.setCurrent($webwork.toLong($month.firstWeek))$week.setLast($webwork.toLong(52))$week.setWrap(true)#foreach ($weeklist in $month.weeks)<TR><TH>$week.next</TH>#foreach ($weekday in $weeklist)<TD #if ($monthnr == $month.thisMonth && $webwork.toInt($weekday) == $month.today) BGCOLOR=#EEAAAA #end>#if ($webwork.toInt($weekday) > 0)$weekday#end </TD>#end</TR>#end</TABLE><HR SIZE=1>#endTime:${timer.time}ms</BODY></HTML>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?