<%
'以下为ASP中通过该日历算法实现的具体代码
 
    '先判断是否指定了一个年份和月份，没有则根据当前的年和月份显示
    If Request("ReqDate")="" then
         CurrentDate=Date
    else
         CurrentDate=Trim(Request("ReqDate"))
    end if 
    pyear=year(CurrentDate)
    pmonth=month(CurrentDate)
 
    '以下的代码生成日历显示的表格头内容
%>
   
   
   
   
 
   
   
   
   
   
   
   
   
 
 
 

'">	<%=pyear%>年<%=pmonth%>月					'">
日	一	二	三	四	五	六