ASP倒计时

2012-08-31  金城  7870

ASP倒计时代码[演示]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%><%
response.Charset="utf-8"
dim destination:destination=#2012-12-21 0:0:0# '' 定义目标时间
dim N:N=now() '' 定格页面打开的时刻,以此计算

dim dd,hh,mm,ss,S
S=datediff("s",N,destination) '' 得出秒差(精确到秒)

dd=S \ (24*3600) '' 天数取整,不足一天不计算在内
hh=(S \ 3600) mod 24 '' 小时取余
mm=(S\60) mod 60 '' 分钟取余
ss=S mod 60 '' 秒数取余

response.Write "距离 <strong>" &destination &"</strong>倒计时<br/><strong>" &dd &"</strong>天<strong>" &hh &"</strong>时<strong>"&mm &"</strong>分<strong>" &ss &"</strong>秒<br/>共计"&S &"秒"

%>

天时分秒等,不能光用 datediff 函数取得,因为这个函数将不足一个单位的按一个单位算。 取余数就可以了。

"\" 整除运算符

mod 取余(求模和取余在VB里是一个概念,某些语言里不一样,如JAVA中略有差异。)