llevar a cabo accion en determinado horario

Iniciado por rubeng, 3 Julio 2006, 21:56 PM

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

rubeng

wenas , tengo una pregunta , como puedo hacer para que se realice una tarea en determinado horario, ya que el uso del timer es muy limitado ademas de que no me sirve para lo que necesito
salu2

Ragnarok

#1
Si que te sirve, pones un timer que cada 6mn mire la hora que es, dadas la hora de la tarea (t) y la hora que es (h) compruebas si |t-h| <= 3mn y de ser así realizas la tarea.

PD: o aún mejor, al arrancar el programa compruebas la hora que es, y pones un timer para t-h.

La cuestión es que se hace con un timer, sólo necesitas poder ver la hora actual, en C se hace con time, en VB seguro que es parecido.
No olvidéis leer las normas generales, además de las específicas de cada tablón.sgae, ladrones

Robokop

como te dice ragnarok tienes que usar un timer que cada cierto tiempo compruebe la hora por ejemplo:

If Hour(Now) = 15 Then
MsgBox "son las 3"
End If



En minutos seria asi:

If minute(Now) = 34 Then
MsgBox "son 34 minutos"
End If



recuerda que en horas debes de usar un formato de 24 horas es decir si son las 3 poner 15 , 6:18 etc..
Si lo quieres para tu sistema has un buen code para que no te gaste demasiados recursos.

rubeng

gracias a los dos pense que el timer no me servia por que solo llega a 60 segundo (1 min) gracias de nuevo
salu2

-POLACO-

Otra forma de hacerlo pero es casi lo mismo, es asi:
pones 2 TextBox y un Timer en un form

'codigo

Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub

Private Sub Text1_Change()
If Text1 = Text2 Then MsgBox "LEgo la hora"
End Sub

Private Sub Timer1_Timer()
Text1 = Format(Now, "hh:mm:ss")'da la hora completa del pc
End Sub
'en el text2 cuando pongas la hora acordate de separarlo con  ":" .
'fin codigo

cuando se igualan los dos tectbox ejecuta la accion .
Saludos espero te sea util.-.