FoxPro/Visual FoxPro - Ejecutar aplicaciones con Visual Fox Pro

 
Vista:

Ejecutar aplicaciones con Visual Fox Pro

Publicado por David (2 intervenciones) el 25/02/2002 18:03:26
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.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ejecutar aplicaciones con Visual Fox Pro

Publicado por ROD (184 intervenciones) el 26/02/2002 03:20:21
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ejecutar aplicaciones con Visual Fox Pro

Publicado por ROD (184 intervenciones) el 26/02/2002 03:20:22
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ejecutar aplicaciones con Visual Fox Pro

Publicado por Marco (1 intervención) el 31/07/2010 05:27:33
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?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar