(solucionado)Duda con hora de ejecucion

Iniciado por Trane!, 16 Julio 2011, 21:32 PM

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

Trane!

Alguien conoce algun ejemplo o me podria explicar como hacer que una accion determinada se ejecute a una hora que este dentro de un textbox?

seba123neo

como accion determinada a que te referis, un .exe externo o un proceso de tu mismo programa ?

podrias hasta crear una tarea de windows con apis.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

Trane!

Cita de: seba123neo en 16 Julio 2011, 21:38 PM
como accion determinada a que te referis, un .exe externo o un proceso de tu mismo programa ?

podrias hasta crear una tarea de windows con apis.

Procesos de mi mismo programa, como por ejemplo a la hora blablabla del textbox que cambie el mensaje de un label ( es solo un ejemplo )

seba123neo

algo basico seria asi:

Código (vb) [Seleccionar]
Dim vFechaEjecutar As String
Dim vHoraEjecutar As String

Private Sub Form_Load()
    ' Cambia los valores de fecha y hora para probar manualmente
    vFechaEjecutar = "16/07/2011"
    vHoraEjecutar = "17:32"

    With Timer1
        .Interval = 1000
        .Enabled = True
    End With
End Sub

Private Sub Proceso1()
    MsgBox ("se ejecuto el proceso")
End Sub

Private Sub Timer1_Timer()
    Me.Caption = Format(Now, "dd/MM/yyyy HH:mm") ' Simplemente para mostrar la fecha y hora

    If vFechaEjecutar = Format(Now, "dd/MM/yyyy") And vHoraEjecutar = Format(Now, "HH:mm") Then
        Timer1.Enabled = False
        Call Proceso1
    End If
End Sub


pone un Timer en el formulario.

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

Trane!

Cita de: seba123neo en 16 Julio 2011, 22:32 PM
algo basico seria asi:

Código (vb) [Seleccionar]
Dim vFechaEjecutar As String
Dim vHoraEjecutar As String

Private Sub Form_Load()
    ' Cambia los valores de fecha y hora para probar manualmente
    vFechaEjecutar = "16/07/2011"
    vHoraEjecutar = "17:32"

    With Timer1
        .Interval = 1000
        .Enabled = True
    End With
End Sub

Private Sub Proceso1()
    MsgBox ("se ejecuto el proceso")
End Sub

Private Sub Timer1_Timer()
    Me.Caption = Format(Now, "dd/MM/yyyy HH:mm") ' Simplemente para mostrar la fecha y hora

    If vFechaEjecutar = Format(Now, "dd/MM/yyyy") And vHoraEjecutar = Format(Now, "HH:mm") Then
        Timer1.Enabled = False
        Call Proceso1
    End If
End Sub


pone un Timer en el formulario.

saludos.

Esto es lo que buscaba, muchisimas gracias :'D