站长资讯网asp设置程序等待时间，使程序停止执行某段时间间隔，代码如下：
Const CUTTime = 5
Response.write(“<body style=’font-size:9pt’>正常执行中..<br>下面调用阻断,挂起流程” & CUTTime & “秒<br><br>”)
Response.Flush
CUT
Response.write(“<br>正常执行中..</body>”)
Response.Flush
Sub CUT()
Dim NOWTime
NOWTime = Now()
Response.write(“<font color=blue>调用阻断,挂起流程.当前时间:” & NOWTime & “</font><br>”)
Response.Flush
Do While Datediff(“s”,NOWTime,Now()) < CUTTime
REM 阻断循环
Loop
Response.write(“<font color=green>销毁阻断,恢复流程.当前时间:” & NOW() & “</font><br>”)
Response.Flush
End Sub
%>
