|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
防盗链 <% http=Request.ServerVariables("HTTP_REFERER") http2=Cstr(Request.ServerVariables("SERVER_NAME")) if mid(http,8,len(http2))<>http2 then response.write "本站禁止从外部站点下载!" else response.redirect "download.doc" \\\'download.doc为下载文件名 end if %> ------------------------------------------------------- 判定星期几 <% yue=month(date()) nian=year(date()) thismon=nian&"-"&yue&"-1" nextmon=dateadd("m",1,thismon) tiancount=datediff("d",thismon,nextmon) \\\'本月的天数 wek= Weekday(date()) select case wek case 1 response.write "周日" case 2 response.write "周一" case 3 response.write "周二" case 4 response.write "周三" case 5 response.write "周四" case 6 response.write "周五" case 7 response.write "周六" end select yue=month(date()) nian=year(date()) thismon=nian&"-"&yue&"-1" nextmon=dateadd("m",1,thismon) tiancount=datediff("d",thismon,nextmon) \\\'本月的天数 dim wek,wekday wek= Weekday(date()) select case wek case 1 wekday= "周日" case 2 wekday= "周一" case 3 wekday= "周二" case 4 wekday= "周三" case 5 wekday= "周四" case 6 wekday= "周五" case 7 wekday= "周六" end select \\\'response.write "本月共"&tiancount&"天,今天是"&wekday&" %> 返回类别: 教程 上一教程: 计算文件下载时间 下一教程: ASP计算页面执行时间 您可以阅读与"大灰狼的ASP工具箱??防盗链、判定星期几"相关的教程: · 大灰狼的ASP工具箱??CDONTS和JMAIL的使用 · 大灰狼的ASP工具箱??XMLHTTP的应用,获得远程的文件,获得远程HTML文件源码 · 大灰狼的ASP工具箱??ASP的错误集合 · 大灰狼的ASP工具箱??用ASP读INI配置文件的函数 · 大灰狼的ASP工具箱??自动获得远程图片 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |