dim data1, data2


data1 = now()
data2 = dateadd("s",3,data1)

do until now() > Cdate(data2)

'test

loop


...rivisitato e corretto grazie anche all'attivissimo ed insuperabile optime

Vorrei solo capire se magari questo loop di 3sec circa, può appesantire il server ? ...nel do loop non ci sono operazioni, però magari qualche disagio lo può creare, o no ?