ASP倒计时
2012-08-31 金城 7874
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 &"秒"
%>
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中略有差异。)