<script language="vbscript">
setTimeout "clock", 1000
sub clock()
t1="2008-10-1 10:30:00" '定义截止时间
num=datediff("s",now(),t1)
s=num mod 60&"秒"
m=(num\60) mod 60
if m=0 then
m=""
else
m=m&"分"
end if
h=(num\60\60) mod 24
if h=0 then
h=""
else
h=h&"时"
end if
d=num\60\60\24
if d=0 then
d=""
else
d=d&"天"
end if
NowTime=d& h & m & s
NowT.InnerHtml=NowTime
setTimeout "clock", 1000
end sub
</script>
距截止时间还有:<font color="#0000FF" ID="NowT">
