ASP常用函数:Delay()

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

  <%

  Function Delay(s)

  Dim t = Now()

  While DateDiff("s", t, Now) < s

  Wend

  End Function

  %>

  转载自:http://jorkin.reallydo.com/article.asp?id=224