SLEEP

nej - det gør der ikke..

der findes en komponent til det.

http://www.serverobjects.com/products.htm#waitfor

og den er freeware!

Nej ikke umiddelbart - men så må man jo lave en selv...

Prøv evt. dette:

Sub DelaySec(DelaySeconds)
  SecCount = 0
  Sec2 = 0
  While SecCount < DelaySeconds + 1
    Sec1 = Second(Time())
    If Sec1 <> Sec2 Then
      Sec2 = Second(Time())
      SecCount = SecCount + 1
    End If
  Wend
End Sub

Dernæst bruger du proceduren på følgende måde:
DelaySec("antal sekunder") ex. DelaySec(2)

/rn

rn, den rutine du har lavet - er du sikker på at at den ikke suger CPU-kraft for vildt ?

btw. Jeg er omgået problemet på en anden måde ..

Pingo gets the points