页面延迟的两个简单方法
<% response.buffer = true %>
<%
' setup the variables necessary to accomplish the task
dim timerstart, timerend, timernow, timerwait
' how many seconds do you want them to wait...
timerwait = 5
' setup and start the timers
timernow = timer
timerstart = timernow
timerend = timerstart + timerwait
' keep it in a loop for the desired length of time
do while (timernow < timerend)
' determine the current and elapsed time[www.iocblog.net 来源]
timernow = timer
if (timernow < timerstart) then
timernow = timernow + 86400
end if
loop
' okay times up, lets git em outa here
response.redirect "nextpage.html" %>
二、
<%
sub timedelayseconds(delayseconds)
seccount = 0
sec2 = 0
while seccount < delayseconds + 1
sec1 = second(time())
if sec1 <> sec2 then
sec2 = second(time())
seccount = seccount + 1
end if
wend
end sub
%>
' to change delay adjust here
<% timedelayseconds(2) %>
文章整理：iocblog
版权申明：本站文章均来自网络，如有侵权，请联系我们，我们收到后立即删除，谢谢！
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有。