como poner tiempo en vb

[DRIGIN]

kiero poner un intervalo de 10 minutos en un programa de capturas de pantalla para k cada 10 minutos sake una nueva pero lo he intentado con un timer pero me pone ke 600000 no es correcto (supongo k porke es muxa cantidad) . Como puedo acer otro metodo para un intervalo de 10 minutos?

PD:no me vale el sleep ya k si duermo el programa me da error ya k aparte de capturar pantallas esta constantemente conprovando y me da error

[Punk-Rock]

Prueba esto:

Código:

Private Sub Wait(ByVal nSec As Integer)
    'Esperar un número de segundos
    Dim t1 As Date, t2 As Date

    t1 = Second(Now)
    t2 = t1 + nSec
    Do
        DoEvents
    Loop While t2 > Second(Now)
End Sub

Se usa asi:

wait(20) ' Asi esperaria 20 Segundos

Si al poner 36000 segundos (10 minutos) te da error cambia el nSec as Integer por nSec As Double.

Espero ke te sirva.
PD: esto duerme el prorama, si no te sirve dilo.

Salu2

[DRIGIN]

pos en principio si ke me va , no me dio de momento problema alguno .

Por casualidad no sabras algun code o dll  para crear la captura pos comprimida o con menos resolucion (la saca a la resolucion actual de pantalla) o algo porke me okupa al ser kreada 1.50 mb casi por eso pongo intervalo 10minutos para k le de tiempo a subir al ftp (tengo poca velocidad de subida) y keria saber si tenias algo para asi poder subirlas con menos intervalos y enteresarse uno de lo ace

[Punk-Rock]

hay modulos para comprimir jpg en VB, buska en google, ahora mismo no rekuerdo ninguno, pero se ke hay.

Salu2