td { font-family: "宋体"; font-size:9pt} '先判断是否指定了一个年份和月份，没有则根据当前的年和月份显示 If Request("ReqDate")="" then CurrentDate=Date else CurrentDate=Trim(Request("ReqDate")) end if pyear=year(CurrentDate) pmonth=month(CurrentDate) '以下的代码生成日历显示的表格头内容 %> '"> 年月 >" onclick="JavaScript:location.href='?ReqDate='"> 日 一 二 三 四 五 六 nunmonthstart and i '如果能被7整除（每行显示7个）则输出一个换行 if i mod 7=0 then response.write( "") end if i=i+1 loop %> [Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]

　　推荐阅读

　　asp模板引擎终结者(WEB开发之ASP模式)

阐述一种全新的ASP模板引擎,实现代码(逻辑)层与HTML(表现)层的分离.这种模板实现方法避免了一 般ASP模板加载模板文件(加载组件)和替换所浪费的资源,实现编译型的模板引擎,提高程序的执行速度和稳定性。内容: >>>详细阅读

本文标题：asp显示日历效果

地址：http://www.17bianji.com/kaifa2/ASP/33307.html

 1/2    1