回 帖 发 新 帖 刷新版面

主题:怎样实现倒计时刷新网页?

怎样实现倒计时刷新网页?[em6][em6][em6][em6][em6][em6][em6]

回复列表 (共2个回复)

沙发

<%
CountdownDate = #1/1/2008 00:00:00AM#
If Date >= CountdownDate Then
   Response.Write "2008  北京"
   Response.End
End If

theDate= Now
DaysLeft = DateDiff("d",theDate,CountdownDate) - 1
theDate = DateAdd("d",DaysLeft,theDate)
HoursLeft = DateDiff("h",theDate,CountdownDate) - 1
theDate = DateAdd("h",HoursLeft,theDate)
MinutesLeft = DateDiff("n",theDate,CountdownDate) - 1
theDate = DateAdd("n",MinutesLeft,theDate)
SecondsLeft = DateDiff("s",theDate,CountdownDate) - 1
%>
<HTML>
<BODY>
现在时间: <%= Now %>
<p>
距离2008年还有 <%= DaysLeft%>天<%= HoursLeft %> 小时<%= MinutesLeft %>分 <%= SecondsLeft %>秒
</BODY>
</HTML>

板凳

这个不错!

我来回复

您尚未登录,请登录后再回复。点此登录或注册