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延时二、 复制代码 代码如下:<% 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 #include file 与 #include virtual 的区别小结第1/2页
这里说的“相对路径”是相对于“主调文件”所在的文件夹。 #include file #include file后面跟的是文件的“相对路径”,不可以用“绝对路径”。 使用相对路径,如:file="scriptfile.inc",file="..scriptfile.i>>>详细阅读
本文标题:asp 延时 页面延迟的三种方法
地址:http://www.17bianji.com/kaifa2/ASP/32035.html
1/2 1