ASPУִijЩASPSleep5ӣűʹõVBScript
£
dim ss = timerdo
loop until timer - s > 5
ӳٺ
<%
FunctionDelay(s)
Dimt=Now()
WhileDateDiff("s",t,Now)
Wend
EndFunction
%>