Como termino esto en el foro libre lol... ? xd
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: scr21 en 23 Julio 2011, 19:54 PM
os juro que yo adivino el futurome entra un presentimiento algunas veces y al final siempre acaba sucediendo.Hace 3 dias me dio uno sobre esa chica al escuchar una cancion de ella por la radio.Y se lo dije a una amiga: yo a esta no le doy mas de 3 meses y zas lo clave
Cita de: seba123neo en 16 Julio 2011, 22:32 PM
algo basico seria asi: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.
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.