|
![]() |
名片设计 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与JAVASCRIPT配合实现多个复选框数据关联显示 · ASP实现在WEB中显示电子表格数据(四)创建文件选择列表 · ASP实现在WEB中显示电子表格数据(三)创建数据表列表和名字范围 · 在ASP中轻松实现记录集分页显示 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |