Romper ejecución un script con un sleep
Publicado: 10 Oct 2012, 17:13
Hola a todos,
Estoy realizando un script que realiza una tarea cada cierto tiempo. Para ello tengo el siguiente código:
Opt("TrayMenuMode",1)
$gSalir = TrayCreateItem("Salir")
TraySetState()
While 1
$msg = TrayGetMsg()
Select
Case $msg = $gSalir
ExitLoop
case Else
pEnvioMail($SmtpServer, $FromName, $FromAddress, $ToAddress, $Subject, $Body, $AttachFiles, $CcAddress, $BccAddress, $Importance, $Username, $Password, $IPPort, $ssl)
Sleep(300000)
EndSelect
WEnd
GUIDelete()
Exit
El caso esque cuando selecciono salir del menú desplegable, el programa no me hace ni caso. ¿ qué hago mal?
Estoy realizando un script que realiza una tarea cada cierto tiempo. Para ello tengo el siguiente código:
Opt("TrayMenuMode",1)
$gSalir = TrayCreateItem("Salir")
TraySetState()
While 1
$msg = TrayGetMsg()
Select
Case $msg = $gSalir
ExitLoop
case Else
pEnvioMail($SmtpServer, $FromName, $FromAddress, $ToAddress, $Subject, $Body, $AttachFiles, $CcAddress, $BccAddress, $Importance, $Username, $Password, $IPPort, $ssl)
Sleep(300000)
EndSelect
WEnd
GUIDelete()
Exit
El caso esque cuando selecciono salir del menú desplegable, el programa no me hace ni caso. ¿ qué hago mal?