I need to open a word document inside lotus notes. I need to apply a specific template to this document. I found using this doesn’t work
uidoc.CreateDocument(“OLEObject”, “”, “c:\template.doc”)
because the OLEBody is not updated.
also if I use this:
Set obj = uidoc.CreateDocument(“OLEObject”, “word.document.8”, “”)
obj.range().InsertFile(“c:\temp.doc”)
this doesn’t work because I lost all the page setup info like margins.
So I finished using this
Set rtItem = New NotesRichTextItem(Source.Document, "Body")
Dim o As NotesEmbeddedObject
Set o = rtItem.EmbedObject(1453, "", "c:\test.doc", "OLEObject")
o.FitToWindow = True
Source.Document.Form = "ole1"
Call Source.Document.save(True, True)
Print Source.Document.UniversalID
Call Source.Close
Call ws.EditDocument(True, Source.Document)
But seems like this code doesn’t use the OLEBody field at all. My question is what happen if I remove the OLEBody from the form?