CFSDN坚持开源创造价值，我们致力于搭建一个资源共享平台，让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章asp 延时 页面延迟的三种方法由作者收集整理，如果你对这篇文章有兴趣，记得点赞哟.

ASP页面延迟的两个简单方法  asp延时第一种  。

复制代码代码如下

<% 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  TimerNow = Timer  If (TimerNow < TimerStart) Then  TimerNow = TimerNow + 86400  End If  Loop  ' Okay times up, lets git em outa here  Response.Redirect "nextpage.html" %>  。

asp延时2、  。

复制代码代码如下

<%  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) %>  。

asp延时第三种方法  。

复制代码代码如下

'asp延时方法  Sub DelayTime(secondNumber)  dim startTime  startTime=NOW()  do while datediff("s",startTime,NOW())<secondNumber  loop  End Sub  call DelayTime(5)  。

测试用可以，但是这样的代码很占CPU,不推荐访问量大的站使用……  。

最后此篇关于asp 延时 页面延迟的三种方法的文章就讲到这里了,如果你想了解更多关于asp 延时 页面延迟的三种方法的内容请搜索CFSDN的文章或继续浏览相关文章，希望大家以后支持我的博客！ 。