老迷的ASP倒计时代码

08-3-13做网页时需要用到一个倒计时插件,刚好碰到光临应天网http://www.aggov.com/的老迷写了个放在网上。代码是与他发邮件交流得来,用了很久,感觉挺好用地。好几年过去了应天网已经不知道什么时候关闭了,找不着这个朋友,但它的代码还是一直在用着。

倒计时插件说明

功能:

1、在预设时间没到前,显示距离多少天的文字。

2、当到预设时间在两天之内,则显示距离多少小时。

3、当到了预定日期,显示今日是XXX。

4、当时间超过预设置日期,则显示XXX已经过去多少天。

特点:在任何支持脚本的地方均可调用,并且可以预设各种日期和事件执行文件为:plus_datediff.asp,参数timevalue为预设日期,必须为时间格式。另一个参数e则是事件参数。

调用代码:<script language="javascript" src="http://www.aggov.com/mz/datediff.asp?timevalue=日期&amp;e=事件" type="text/javascript"></script>例子:

<script language="javascript" src="=元旦" type="text/javascript"></script>会显示“距离元旦还有XX天。”>

plus_datediff.asp页面代码

-----------------------------------begain-------------------------

<%@ LANGUAGE = VBScript CodePage = 936 %>

<%

Option Explicit

Response.Buffer = True

'Copyright 2005 aggov.com

'Response.Write "document.write("""

If IsDate(Request.QueryString("timevalue")) Then

If DateDiff("D",Now(),

Request.QueryString("timevalue")) >= 3 Then

Response.Write "离"&Request.QueryString("e")

Response.Write "还有 <b>"& DateDiff("D",Now(),

Request.QueryString("timevalue"))&"</b> 天"

ElseIf DateDiff("D",Now(),

Request.QueryString("timevalue")) < 3 and DateDiff("D",Now(),

Request.QueryString("timevalue")) > 0 Then

Response.Write "离"&Request.QueryString("e")

Response.Write "还有 <b>"& DateDiff("h",Now(),

Request.QueryString("timevalue"))&"</b> 小时"

ElseIf DateDiff("D",Now(),

Request.QueryString("timevalue")) = 0 Then

Response.Write "今天是 "&

Request.QueryString("timevalue") &" "&

Request.QueryString("e")

Else

Response.Write Request.QueryString("e")&"已经过去 <b>"& Abs(DateDiff("D",Now(),

Request.QueryString("timevalue")))&"</b> 天"

End If

Else

Response.Write "没提交正确时间"

End If

Response.Write """);"

%>

-----------------------------------end-------------------------

旧文见:http://liujinyuan.com.cn/baidu-blog/blog/144095850.html



您可以选择一种方式赞助本站

支付宝转账赞助

支付宝扫一扫赞助

微信钱包扫描赞助

发表评论

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen:

图片 表情