AS/400 - Listados en Entorno y Client Access

Deseo saber con que codigo puedo ejecutar aplicaciones (Word, Explorador de Windows, Outlook Express,etc; por ejemplo) desde un formulario o programa de Visual Fox Pro.

HOLA COMO ESTAS?

HAY VARIAS FORMAS:

1-. POR EJEMPLO PARA ABRIR ARCHIVO ASOCIADO A UNA APLICACION PUEDES USAR EL SIGUIENTE CODIGO
*********************************
DECLARE INTEGER ShellExecute IN "Shell32.dll" ;
INTEGER hwnd, ;
STRING lpVerb, ;
STRING lpFile, ;
STRING lpParameters, ;
STRING lpDirectory, ;
LONG nShowCmd

* Abre el documento "c:\prueba.doc" Este documento debe existir
=Shellexecute(0,"Open","c:\prueba.doc","","",0)

* Abre el explorador por defecto en la pagina especificada
=Shellexecute(0,"Open","http://www.geocities.com/tldsoft","","",0)
* Imprime el archivo "c:\prueba.txt" este archivo debe existir
=Shellexecute(0,"Print","c:\prueba.txt","","",0)

O TAMBIEN PUEDES USAR EL COMANDO RUN DE ESTA FORMA

! /N C:\Archivos de programa\Internet Explorer\IEXPLORE.EXE (Navegador)

! /N CONTROL COLOR (selector de colores de Window)

Para interactuar con WORD y EXCEL existen multiples formas si las deseas, anotalo en en foro.

Atte ROD

HOLA COMO ESTAS?

HAY VARIAS FORMAS:

1-. POR EJEMPLO PARA ABRIR ARCHIVO ASOCIADO A UNA APLICACION PUEDES USAR EL SIGUIENTE CODIGO
*********************************
DECLARE INTEGER ShellExecute IN "Shell32.dll" ;
INTEGER hwnd, ;
STRING lpVerb, ;
STRING lpFile, ;
STRING lpParameters, ;
STRING lpDirectory, ;
LONG nShowCmd

* Abre el documento "c:\prueba.doc" Este documento debe existir
=Shellexecute(0,"Open","c:\prueba.doc","","",0)

* Abre el explorador por defecto en la pagina especificada
=Shellexecute(0,"Open","http://www.geocities.com/tldsoft","","",0)
* Imprime el archivo "c:\prueba.txt" este archivo debe existir
=Shellexecute(0,"Print","c:\prueba.txt","","",0)

O TAMBIEN PUEDES USAR EL COMANDO RUN DE ESTA FORMA

! /N C:\Archivos de programa\Internet Explorer\IEXPLORE.EXE (Navegador)

! /N CONTROL COLOR (selector de colores de Window)

Para interactuar con WORD y EXCEL existen multiples formas si las deseas, anotalo en en foro.

Atte ROD

Funciona a la perfeccion con la especificacion de un solo archivo.c:\prueba.doc o cualquier otra que se le teclee. Trate de cambiarlo poniendo una ruta de acceso, por el explorador, por una constante y no lo ejecuta. ¿Como podria sustituir "c:\prueba.doc" por otro, en tiempo de ejecucion?