FoxPro/Visual FoxPro - Funcion ShellExec

ShellExec es una poderosa función que podemos incorporar en nuestras aplicaciones.
Manda llamar al programa que esta asociado a en un determinado archivo.


FUNCTION ShellExec
LPARAMETER lcLink, lcAction, lcParms

lcAction = IIF(EMPTY(lcAction), "Open", lcAction)
lcParms = IIF(EMPTY(lcParms), "", lcParms)

DECLARE INTEGER ShellExecute ;
IN SHELL32.dll ;
INTEGER nWinHandle, ;
STRING cOperation, ;
STRING cFileName, ;
STRING cParameters, ;
STRING cDirectory, ;
INTEGER nShowWindow

DECLARE INTEGER FindWindow ;
IN WIN32API ;
STRING cNull,STRING cWinName

RETURN ShellExecute(FindWindow(0, _SCREEN.caption), ;
lcAction, lcLink, ; lcParms, SYS(2023), 1)

ENDFUN



Ejemplos :

Mandar Correo Electrónico:
ShellExec("mailto:[email protected]")



Abrir Explorador de Windows:
ShellExec("c:\")



Abrir Internet Explorer
ShellExec("http://www.microsoft.com")
etc, etc.



Otra forma de utilizarlo es por medio del Objeto Shell.
o=CREATEOBJECT("Shell.Application")
o.Open("http://www.microsoft.com")
o.SetTime()
o.ShutdownWindows()
o.FileRun()
o.FindFiles()
o.FindComputer()
o.MinimizeAll()
Suerte

Voy a revisar sobretodo para internet...

Buen aporte!!

Exelente compañero !!!. lo voy a aplicar Gracias