Pausa in ASP

Winserver.it
Per effettuare una PAUSA in ASP Classic, ho utilizzato questo codice.
Il >1 finale indica 1 secondo e può essere variato a proprio piacere.

startTime = Time()
Do Until DateDiff("s", startTime, Time(), 0, 0) > 1
Loop