LLamar a un programa externo

Dos formas:

1. Con API
DECLARE INTEGER WinExec IN WIN32API ;
STRING cCmdLine, ;
INTEGER nCmdShow
lcExe = GETFILE("EXE")
=WinExec(lcExe,1)

2. Con WSH
lcExe = GETFILE("EXE")
loWshShell=CREATEOBJECT("Wscript.Shell")
loWshShell.RUN(lcExe,1,.F.)
loSwhShell = NULL


Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"USHIRO" escribió en el mensaje
news:

Lo que ando buscando es tener un campo normal de texto en donde pueda
escribir la direccion de algun .exe o programa que tenga instalado en el
sistema y tener un boton que al darle click me ejecute el fichero que
escribi y si no lo encuentra que me muestre un mensaje de error que el
programa no se ha encontrado.

Saludos,


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Exelente, me funciona sin problemas.

Saludos,


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Me apresure un poco, cuando la direccion del exe lleva espacios en blank
por ejemplo C:\Archivos de Programa\ejemplo.exe me tira un error que no se
encuentra el archivo.

-
PortalFox :: Nada corre como un zorr
http://www.portalfox.co

PortalFox - NNTP Forum Gatewa

Hice unas pruebas con la primera solucion que te dio el Sr Luis Ma. y no
importa si la ruta tiene espacio el programa se ejecuta. para el segundo
caso si ocurre el problema que planteas para solucionarlo simplemente
encierra entre comillas la ruta

lcExe = GETFILE("EXE")
lcExe='"' + lcExe +'"'
loWshShell=CREATEOBJECT("Wscript.Shell")
loWshShell.RUN(lcExe,1,.F.)
loSwhShell = NULL

Abraham Uribe
Medellin-Colombia

"USHIRO" escribió en el mensaje
news:

Me apresure un poco, cuando la direccion del exe lleva espacios en blank
por ejemplo C:\Archivos de Programa\ejemplo.exe me tira un error que no se
encuentra el archivo.


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway