Às vezes precisamos atrasar a execução das seguintes funções, mas não é recomendado pensar de forma diferente. Duas maneiras simples de atrasar páginas ASP
asp atraso primeiro tipo
Copie o código do código da seguinte forma:
<% Response.Buffer = Verdadeiro %>
<%
'Configura as variáveis necessárias para realizar a tarefa
Dim TimerStart, TimerEnd, TimerNow, TimerWait
'Quantos segundos você quer que eles esperem...
Temporizador de espera = 5
'Configura e inicia os temporizadores
TimerAgora = Temporizador
TimerStart = TimerAgora
TimerEnd = TimerStart + TimerWait
' Mantenha-o em um loop pelo período de tempo desejado
Fazer enquanto (TimerNow <TimerEnd)
'Determina o tempo atual e decorrido
TimerAgora = Temporizador
Se (TimerNow <TimerStart) Então
Temporizador Agora = Temporizador Agora + 86400
Terminar se
Laço
'Ok, o tempo acabou, vamos tirá-los daqui
Response.Redirect nextpage.html %>
atraso asp 2,
Copie o código do código da seguinte forma:
<%
Sub TimeDelaySeconds(DelaySeconds)
Contagem de segundos = 0
Seg2 = 0
Enquanto SecCount <DelaySeconds + 1
Seg1 = Segundo(Tempo())
Se Sec1 <> Sec2 Então
Seg2 = Segundo(Tempo())
ContagemSeg = ContagemSec + 1
Terminar se
Wend
Finalizar sub
%>
'Para alterar o atraso ajuste aqui
<% TimeDelaySeconds(2) %>
O terceiro método de atraso asp
Copie o código do código da seguinte forma:
'método de atraso asp
SubDelayTime(segundoNúmero)
escurecer startTime
horainicial=AGORA()
faça while datediff(s,startTime,NOW())<secondNumber
laço
Finalizar sub
callDelayTime(5)
Ele pode ser usado para testes, mas esse código ocupa muita CPU e não é recomendado para sites com muitas visitas...