Cerrar Procesos

[okunova]

Buenas como seria el codigo para que las apliciones que abro cuando estas se cierren no queden procesos abiertos

Opt("TrayIconHide", 0)
Run("Aplicacion\1.exe" )
Run("Aplicacion\2.exe" )

Comos se haria si yo cierro los programas el script no quede abierto y si estos programas estan abiertos que me salte un mensaje de que esta abierto.

Gracias un saludo

[XPyro]

Un pequeño ejemplo:

Código: Seleccionar todo

If ProcessExists("1.exe") Then MsgBox(0, "Ejecutando", "el archivo esta corriendo")
ProcessWaitClose("1.exe")
MsgBox(0, "Terminado", "Proceso cerrado")

Así entendí el mensaje

[okunova]

L voy a probar, otra cosa a ver si alguien sabe como seria un script tipico para realizar un portable, es decir abrir la aplicacion portable y si esta abierta que salte un mensaje y al cerrar esta aplicacion se cierren todos los proccesos, tambien ocultar el icono de la barra de tareas cuando se ejecute el script.

Algo como los que realizan los portables de appportables

Gracias un saludo

[XPyro]

Yo tengo ya tiempo creando portables y realize un manual, ya hace un año y no esta muy actualizado pero seguro te servira

http://mundoxpyro.blogspot.com/2008/10/ ... e-con.html

[okunova]

Buenas no se si se puede hacer pero como seria el codido para que una vez se ejecuten estas tres aplicaciones, que a la hora de cerrar la aplicacion 1.exe se cierren autmaticamente las otras dos
Run("1.exe" )
Run("2.exe" )
Run("3.exe" )

[Chefito]

Claro que se puede hacer, de varias formas.
Una sería meter dentro del while una condición, la cual se cumpliese cuando el primer proceso no existiese....e inmediatamente cerrase los otros dos. Ya te lo dijo más o menos Xpyro.

Código: Seleccionar todo

while 1
sleep(10)
If ProcessExists("1.exe")=0 Then
ProcessClose ( "2.exe")
ProcessClose ( "3.exe")
msgbox(0,"","Los procesos han sido cerrados")
exit
endif
wend

Algo así.

Saludos.

[okunova]

No me funciona com me lo pones tu, pero bueno en el fondo quiero que cuando cierre las aplicaciones estas no se queden en memoria, por que a veces se quedan en memoria y no las puedo volver a ejecutar como puedo poner para que se cierren los procesos.
Mi codigo es este

Opt("TrayIconHide", 0)
Run("Aplicacion\Fuente\Aplicacion.exe" e)
Sleep (4000)
Run("Aplicacion\Fuente\Aplicacion2.exe" )
Exit

Gracias por todo