الكود قصير للغاية ، لكنه كلاسيكي للغاية ، الوحدة هي ثوان ، مما يعني أن استهلاك موارد الخادم لم يتم اختباره:
<٪
FunctionDelay (s)
dimt = الآن ()
Whiledatediff ("S" ، t ، الآن) <s
ويند
الوظيفية
٪>
أعيد طبعه من: http://jorkin.reallodo.com/article.asp؟id=224