FoxPro/Visual FoxPro - Cerrar aplicaciones con Visual Fox

Hola a todos. de antemano gracias por tomar un timpo para leer esta nota. Quiero hacer un proceso con visual fox en el que con una instruccion me cierre un .bat . Yo se que con la instruccion !RUN puedes correr una aplicacion pero mi pregunta es si existe una instruccion para cerrar una ventana que no sea de visual fox.
Gracias.

espero que te sirva:

*****
**** CREO FUNCION PARA EJECUTAR EL PROGRAMA O BAT DE DOS
****
LOCAL loWshShell
loWshShell = CreateObject("WScript.Shell")
****
**** EJECUTO UN BAT DE DOS Y LO DEJO EN MEMORIA
****
loWshShell.Run("lp.bat", 1, .F.)
****
**** CONTINUO REALIZANDO CUALQUIER OPERACION EN DOS
****
WAIT " ** Programa en memoria - precione cualqueir tecla para cancelar ** "
***
****
**** CANCELO EJECUCION DEL PROGRAMA EN DOS
****
loWshShell.Run("C:\WINDOWS\SYSTEM32\TASKKILL /F /IM CMD.EXE", 1, .F.)
****
WAIT " ** Programa Cancelado ** "
****
OBSERVACIONES: Pasando .f. en el tercer parámetro del método RUN le
indica a VFP que no esperar hasta que el EXE llamado termine.
puedes sustituir lp.bat por cualquier ejecutable. en la cancelacion el
ejecutable "cmd.exe", lo debes replazar por el nombre del ejecutable.
se cancela "cmd.exe" porque es un BAT. (Nota para windows xp)

Jesus Cordero
Caracas - Venezuela

excelente aporte... gracias

espero que te sirva:

*****
**** CREO FUNCION PARA EJECUTAR EL PROGRAMA O BAT DE DOS
****
LOCAL loWshShell
loWshShell = CreateObject("WScript.Shell")
****
**** EJECUTO UN BAT DE DOS Y LO DEJO EN MEMORIA
****
loWshShell.Run("lp.bat", 1, .F.)
****
**** CONTINUO REALIZANDO CUALQUIER OPERACION EN DOS
****
WAIT " ** Programa en memoria - precione cualqueir tecla para cancelar ** "
***
****
**** CANCELO EJECUCION DEL PROGRAMA EN DOS
****
loWshShell.Run("C:\WINDOWS\SYSTEM32\TASKKILL /F /IM CMD.EXE", 1, .F.)
****
WAIT " ** Programa Cancelado ** "
****
OBSERVACIONES: Pasando .f. en el tercer parámetro del método RUN le
indica a VFP que no esperar hasta que el EXE llamado termine.
puedes sustituir lp.bat por cualquier ejecutable. en la cancelacion el
ejecutable "cmd.exe", lo debes replazar por el nombre del ejecutable.
se cancela "cmd.exe" porque es un BAT. (Nota para windows xp)

Jesus Cordero
Caracas - Venezuela

espero que te sirva:

*****
**** CREO FUNCION PARA EJECUTAR EL PROGRAMA O BAT DE DOS
****
LOCAL loWshShell
loWshShell = CreateObject("WScript.Shell")
****
**** EJECUTO UN BAT DE DOS Y LO DEJO EN MEMORIA
****
loWshShell.Run("lp.bat", 1, .F.)
****
**** CONTINUO REALIZANDO CUALQUIER OPERACION EN VFP
****
WAIT " ** Programa en memoria - precione cualqueir tecla para cancelar ** "
***
****
**** CANCELO EJECUCION DEL PROGRAMA EN DOS
****
loWshShell.Run("C:\WINDOWS\SYSTEM32\TASKKILL /F /IM CMD.EXE", 1, .F.)
****
WAIT " ** Programa Cancelado ** "
****
OBSERVACIONES: Pasando .f. en el tercer parámetro del método RUN le
indica a VFP que no esperar hasta que el EXE llamado termine.
puedes sustituir lp.bat por cualquier ejecutable. en la cancelacion el
ejecutable "cmd.exe", lo debes replazar por el nombre del ejecutable.
se cancela "cmd.exe" porque es un BAT. (Nota para windows xp)

Jesus Cordero
Caracas - Venezuela

espero que te sirva:

*****
**** CREO FUNCION PARA EJECUTAR EL PROGRAMA O BAT DE DOS
****
LOCAL loWshShell
loWshShell = CreateObject("WScript.Shell")
****
**** EJECUTO UN BAT DE DOS Y LO DEJO EN MEMORIA
****
loWshShell.Run("lp.bat", 1, .F.)
****
**** CONTINUO REALIZANDO CUALQUIER OPERACION EN VFP
****
WAIT " ** Programa en memoria - precione cualqueir tecla para cancelar ** "
***
****
**** CANCELO EJECUCION DEL PROGRAMA EN DOS
****
loWshShell.Run("C:\WINDOWS\SYSTEM32\TASKKILL /F /IM CMD.EXE", 1, .F.)
****
WAIT " ** Programa Cancelado ** "
****
OBSERVACIONES: Pasando .f. en el tercer parámetro del método RUN le
indica a VFP que no esperar hasta que el EXE llamado termine.
puedes sustituir lp.bat por cualquier ejecutable. en la cancelacion el
ejecutable "cmd.exe", lo debes replazar por el nombre del ejecutable.
se cancela "cmd.exe" porque es un BAT. (Nota para windows xp)

Jesus Cordero
Caracas - Venezuela

espero que te sirva:

*****
**** CREO EL OBJETO PARA EJECUTAR EL PROGRAMA O BAT DE DOS
****
LOCAL loWshShell
loWshShell = CreateObject("WScript.Shell")
****
**** EJECUTO UN BAT DE DOS Y LO DEJO EN MEMORIA
****
loWshShell.Run("lp.bat", 1, .F.)
****
**** CONTINUO REALIZANDO CUALQUIER OPERACION EN VFP
****
WAIT " ** Programa en memoria - precione cualqueir tecla para cancelar ** "
***
****
**** CANCELO EJECUCION DEL PROGRAMA EN DOS
****
loWshShell.Run("C:\WINDOWS\SYSTEM32\TASKKILL /F /IM CMD.EXE", 1, .F.)
****
WAIT " ** Programa Cancelado ** "
****
OBSERVACIONES: Pasando .f. en el tercer parámetro del método RUN le
indica a VFP que no esperar hasta que el EXE llamado termine.
puedes sustituir lp.bat por cualquier ejecutable. en la cancelacion el
ejecutable "cmd.exe", lo debes replazar por el nombre del ejecutable.
se cancela "cmd.exe" porque es un BAT. (Nota para windows xp)

Jesus Cordero
Caracas - Venezuela

espero que te sirva:

*****
**** CREO EL OBJETO PARA EJECUTAR EL PROGRAMA O BAT DE DOS
****
LOCAL loWshShell
loWshShell = CreateObject("WScript.Shell")
****
**** EJECUTO UN BAT DE DOS Y LO DEJO EN MEMORIA
****
loWshShell.Run("lp.bat", 1, .F.)
****
**** CONTINUO REALIZANDO CUALQUIER OPERACION EN VFP
****
WAIT " ** Programa en memoria - precione cualqueir tecla para cancelar ** "
***
****
**** CANCELO EJECUCION DEL PROGRAMA EN DOS
****
loWshShell.Run("C:\WINDOWS\SYSTEM32\TASKKILL /F /IM CMD.EXE", 1, .F.)
****
WAIT " ** Programa Cancelado ** "
****
OBSERVACIONES: Pasando .f. en el tercer parámetro del método RUN le
indica a VFP que no esperar hasta que el EXE llamado termine.
puedes sustituir lp.bat por cualquier ejecutable. en la cancelacion el
ejecutable "cmd.exe", lo debes replazar por el nombre del ejecutable.
se cancela "cmd.exe" porque es un BAT. (Nota para windows xp)

Jesus Cordero
Caracas - Venezuela