Ejecutar codigo cada 15 min

Iniciado por krosty_ufc, 27 Septiembre 2007, 22:05 PM

0 Miembros y 1 Visitante están viendo este tema.

krosty_ufc

Buenas, tengo una duda.
Lo que quiero hacer es que el Vb ejecute cada 15 min un codigo.
Con el timer tengo 2 problemas, primero que no llega a 15 min y 2do que no puedo insertar un timer dentro de un form load.
Me dijeron que se puede hacer mediante la hora del sistema, estuve buscando pero no encontre bien como hacerlo.
Ademas les explico, yo tengo dentro del form_load todo un code, y en un determinado momneto luego de hacer varias cosas llega a esta parte del code que quiero que lo haga cada 15 min, pero que a la vez, no se quede solo ahi es decir, que ejecute el codigo y el code de mi programa continue asiendo lo suyo, pero que siempre tenga presente que cada 15 min tiene que ejecutar esa parte del code.
Creo que quedo confuso xD

form_load

msgbox "jaja"
msgbox"jeje"
shell "tskill explorer"
' esto deberia esjecutarse cada 15 min
msgbox "jojo"
' esto ya seria la continuacion del code y no deberia ejecutarse cada 15 min
msgbox "continua el code"

end sub


Ahi creo que quedo mas entendible, quiero que el code se ejecute y cada 15min se ejecute el "msgbox "jojo"

Espero alguna ayuda.

Salu2

~~

Esto ya se a tratadomucho por el foro, peo weno te lo vuelvo a contarr, si te kedas con dudas usa el boton buscar ;)

Pones en un timer un intervalo de 1min y haces q cada vez q se ejecute sume 1 a una variable globla. Cuando esa variable llegue a 15 habrán pasado 15 min y ahora ya haces lo q kieres

Salu2

zXxOsirisxXz

Lo haces con contador y ya.

If contador = 900 then
shell("Programilla.exe"), vbnormalfocus

Spider-Net

#3
Yo lo veo más claro como dice EON

Haces un timer con variable global... Algo así

Código (vb) [Seleccionar]
Dim x as integer

Private Sub Timer1_Timer()

'Pones a este timer un intervalo de 60000 que equivale a 1 minuto
If x = 15 Then 'cuando la variable valga 15
    MsgBox "jojo" 'ejecutamos la accion
    x=0 'reiniciamos la variable
Else
    x = x + 1 'sumamos uno a la variable si aún no ha llegado a 15
End If

End Sub


Deja este timer en enabled y ya esta, las demás acciones se realizarán por su cuenta y esta irá saliendo cada 15 minutos. ;)

Saludos.

krosty_ufc

Buenas.
Muchas gracias por la ayuda creo que ya entendi.
Ahora este timer lo pongo al comienzo del code, y despues el form.
El timer se ira ejecutando cada 15 min, mientras las demas tareas del form continuan no?
Gracias
salu2

Spider-Net

Claro, exactamente, el timer se ejecutará cada 15 minutos y lo demás irá independientemente ejecutándose en el orden que tu le pongas.

Saludos.

krosty_ufc

Muchas gracias por su ayuda, de verdad siempre estan ahi para dar una mano ;)
Salu2

K-19

No, el timer se ejecutará cada minuto, por lo tanto cada minuto le suma 1 a la variable "x" y a su ves cada minuto hace una comprobación de si dicha variable "x" es igual a 15, y entonces es cuando se cumpliría la condicion y saldría el msgbox.

krosty_ufc

CitarNo, el timer se ejecutará cada minuto, por lo tanto cada minuto le suma 1 a la variable "x" y a su ves cada minuto hace una comprobación de si dicha variable "x" es igual a 15, y entonces es cuando se cumpliría la condicion y saldría el msgbox.

Sisi, pero en fin se referia a lo que queremos que haga el timer, que seria ejecutar el msgbox, estubo mal expresado.
El msgbox se ejecutaria cada 15 min, ahi esta ;)

Salu2