Two simple ways to delay ASP pages
ASP delay of the first
Copy Code code as follows:
<% Response.Buffer = True%>
<%
' Setup the variables necessary to accomplish the task
Dim Timerstart, Timerend, Timernow, timerwait
' How many seconds do your want them to wait ...
timerwait = 5
' Setup and start ' timers
Timernow = Timer
Timerstart = Timernow
Timerend = Timerstart + timerwait
' Keep it in a loop for the desired length of
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 and lets git em outa here
Response.Redirect "Nextpage.html"%>
ASP delay two,
Copy Code code as follows:
<%
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 the change delay adjust here
<% timedelayseconds (2)%>
The third method of ASP delay
Copy Code code as follows:
' ASP Delay method
Sub Delaytime (Secondnumber)
Dim starttime
Starttime=now ()
Do While DateDiff ("s", Starttime,now ()) <secondnumber
Loop
End Sub
Call Delaytime (5)
Test can be used, but such a code is very CPU, do not recommend a large number of stations to use ...
