|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% xztime=date if weekday(xztime)=1 then xztime=DateAdd("d", -6, xztime) if weekday(xztime)=2 then xztime=xztime if weekday(xztime)=3 then xztime=DateAdd("d", -1, xztime) if weekday(xztime)=4 then xztime=DateAdd("d", -2, xztime) if weekday(xztime)=5 then xztime=DateAdd("d", -3, xztime) if weekday(xztime)=6 then xztime=DateAdd("d", -4, xztime) if weekday(xztime)=7 then xztime=DateAdd("d", -5, xztime) for j=1 to 14 id= weekday(xztime) select case id case 2 dd="星期一" case 3 dd="星期二" case 4 dd="星期三" case 5 dd="星期四" case 6 dd="星期五" case 7 dd="星期六" case else dd="星期日" end select response.Write(year(xztime)&"年"&month(xztime)&"月"&day(xztime)&"日" &dd&"<br>") xztime= DateAdd("d", 1, xztime) next %> 返回类别: 教程 上一教程: 一个异常好用的发送邮件的组件 下一教程: 全面了解COOKIE的传递流程、编程实现及安全问题 您可以阅读与"ASP实现连续显示两周的时间和星期"相关的教程: · ASP里的时间涵数 · ASP实现在WEB中显示电子表格数据(三)创建数据表列表和名字范围 · 直接显示"Monday"等星期的ASP语句 · 用ASP实现长文章用分页符来分页显示 · ASP中和星期有关的自定义函数 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |