Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Automatizacion desde VFP

27/07/2005 - 20:05 por MPOLO S.L. - Departamento Calidad | Informe spam
Ayuda Hacer una pregunta
Estimado grupo:

Estoy intentando hacer una automatizacion de WORD, en la cual ingreso
variables de word desde mi aplicacion, y las actualizo. Esta actualizacion
me funciona perfectamente siempre y cuando, la variable no esté contenida en
el encabezado. En este último caso no encuentro la forma de recargarla. Si
alguien me pudiera ayudar

oap=createobject("word.application")

oap.Documents.Add()

oap.visible=.t.

oap.Documents(1).Variables.add("<<sgsegto_dcdocs_dcid>>","prueba")

&& Y con esto recargo

oap.Documents(1).update && Esto siempre funciona excepto con el Hader y el
Foot del documento



Desde ya muy agradecido

Martin R Sanchez Arnoletto
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Cindy Winegarden
28/07/2005 - 06:06 | Informe spam
Hola Martin,

I don't speak Spanish, but maybe this is what you need:

oAp = CreateObject("Word.Application")
oAp.Visible = .T.
oAp.Documents.Add()
oAp.Documents(1).Variables.Add("<<sgsegto_dcdocs_dcid>>","prueba")
#Define wdPrimaryHeaderStory 7
#Define wdPrimaryFooterStory 9
oAp.Documents(1).StoryRanges(wdPrimaryHeaderStory).Fields.Update()
oAp.Documents(1).Variables(1).Value = "This is the footer"
oAp.Documents(1).StoryRanges(wdPrimaryFooterStory).Fields.Update()

Cindy Winegarden MCSD, Microsoft Visual Foxpro MVP
www.cindywinegarden.com
Blog: http://spaces.msn.com/members/cindywinegarden


"MPOLO S.L. - Departamento Calidad" wrote in message
news:
Estimado grupo:

Estoy intentando hacer una automatizacion de WORD, en la cual ingreso
variables de word desde mi aplicacion, y las actualizo. Esta actualizacion
me funciona perfectamente siempre y cuando, la variable no esté contenida
en
el encabezado. En este último caso no encuentro la forma de recargarla. Si
alguien me pudiera ayudar

oap=createobject("word.application")

oap.Documents.Add()

oap.visible=.t.

oap.Documents(1).Variables.add("<<sgsegto_dcdocs_dcid>>","prueba")

&& Y con esto recargo

oap.Documents(1).update && Esto siempre funciona excepto con el Hader y
el
Foot del documento



Desde ya muy agradecido

Martin R Sanchez Arnoletto








Preguntas similares

 

Busqueda sugerida :