Power Builder - Para OSCAR (OLE en WORD)

 
Vista:

Para OSCAR (OLE en WORD)

Publicado por Carlos Araujo (3 intervenciones) el 07/11/2004 12:14:31
Hola Oscar o quien pueda ayudarme, hace unos dias atras coloqué en el foro una pregunta acerca de combinar correspondencia en word , y oscar me envio una respuesta , la programé , pero me sale el siguiente error . "Error calling external object function item at line...", es decir, se refiere a la instrucción :
ole_object.ActiveDocument.Bookmarks.item("nombre").Select
la probe en 3 computadores y me da lo mismo, que estoy haciendo mal ? o que no tengo registrado ?.... estoy usando PB6.5 y Word 2000. Gracias
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:Combinar correspondencia Word

Publicado por Oscar (1178 intervenciones) el 07/11/2004 17:47:50
Las funciones para insertar texto o combinar correspondencia en Word, varían dependiendo de la versión de PB y de Office.

* Por ejemplo para conectarte a Office 97, debes modificar:
li_result = contrato.ConnectToNewObject("word.application.8")
en vez de:
li_result = ole_object.ConnectToNewObject("word.application")

* Para Insertar marcadores en Office 97, debes modificar:
ole_object.Selection.GoTo(-1,0,0,"marcador_nombre")
en vez de:
ole_object.ActiveDocument.Bookmarks.item("marcador_nombre").Select

* Para trabajar con marcadores en PB 6.0 y Office 97
Te mando un ejemplo de un libro de PB 6.0:
Ejemplo:
Integer result
OLEObject lole_object
lole_object=CREATE OLEObject

result=lole_object.ConnectToNewObject("word.basic")
IF result=0 THEN
lole_object.fileopen("C:\carta.doc")
lole_object.editgoto("marcador")
lole_object.insert("el texto que quieras")
lole_object.fileprint()
END IF
DESTROY lole_object

Nota: Traté de correrlo con PB 8 (y PB 9) con Word XP; pero como era de esperarse no funcionó. Espero que tú hagas la prueba en las versiones que usas y nos comentes.
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