FoxPro/Visual FoxPro - Archivo .doc

 
Vista:
Imágen de perfil de Analia

Archivo .doc

Publicado por Analia (186 intervenciones) el 16/08/2010 20:04:27
Hola !!, querria saber como hago para abrir un archivo .doc en una aplicacion desarrollada por mi. Que habra el word se pueda leer el archivo . doc y que al cerrar el word que la aplicacion que se estaba ejecutando.
Espero me puedan ayudar.
Saludos.
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:Archivo .doc

Publicado por Juan Fernando (537 intervenciones) el 16/08/2010 23:09:39
puedes desarrollar una clase con un arch.Prg, o descargar un control Ocx
que provee el Visual Foxpro ..

mí cuenta es [email protected]
Espero ser de ayuda ,tengo algunos artículos colgados en www.mygnet.net
sección Manuales
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
Imágen de perfil de Analia

RE:Archivo .doc

Publicado por Analia (186 intervenciones) el 16/08/2010 23:31:26
Hola !!, podrias darme más detalles sobre como desarrollar la clase ó pasarme algun ejemplo.
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:Archivo .doc

Publicado por Juan Fernando (537 intervenciones) el 17/08/2010 21:48:02
copia este código en un prg,debería llamar un documento creado en Microsoft Word ..

co.

_vfp.AutoYield = .F.


Public oForm

oForm = Createobject("formword")

oForm.Show()



*- Definición de la clase formword

Define Class formword
As Form


Add Object oleWebWrowser
As
IEClass
With;


Name
=
"oleWebBrowser"



Procedure Resize


This.oleWebBrowser.Height
=
This.Height


This.oleWebBrowser.Width
=
This.Width


EndProc


Procedure Init


With This.oleWebBrowser


.Top
= 0


.Left
= 0

** Analia aquí abres el documento, junto a la Clase
** SUERTE **
.Navigate(Getfile("Archivos
de word (*.doc):doc"))


EndWith



This.Resize()


EndProc


EndDefine




*- Definición de la clase IEClass

Define Class IEClass
As OleControl


OleClass =
"Shell.Explorer.2"



Procedure Init


This.Navigate("about:blank")


EndProc



Procedure Refresh


Nodefault


EndProc

EndDefine
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
sin imagen de perfil

RE:Archivo .doc

Publicado por Juanma Cruz (512 intervenciones) el 01/09/2010 11:11:31
Debes trabajar con la clase WORD... asumiendo siempre que tienes instalado Word en el ordenador, de lo contrario no funcionará.

local oWord= object
oWord= CreateObject("Word.Application")
oWord.Documents.Open("C:\fidelizacion.docx")
oWord.Application.Visible= .T.

Ya es cosa que sigas buscando la documentación de la clase y vayas probando cosas nuevas.
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