ASP常用函数:Delay()

代码很短,但是很经典,单位是秒,就是未测试过服务器资源消耗怎么样:

1. <%  
2. Function Delay(s)  
3.     Dim t = Now()  
4.     While DateDiff("s", t, Now) < s  
5.     Wend  
6. End Function  
7. %>