LotusScript for Visual Basic Programmers - IBM Redbooks

Set object = rtitem.EmbedObject _
(EMBED_OBJECTLINK, "", _
"D:\NOTES\DATA\MSWORD\WDREADME.DOC", _
"MS Word 6")
Display the message “Object has been linked. Save this document?” from
the msg variable in a message box labeled “Save” containing a Yes and No
button. This message box function returns a value when the button is
clicked.
answer% = Messagebox ("Object has beed linked" _
& Chr(10) & "Save this document?", _
boxtype, "Save ?")
Save this Notes document without creating a response document.
Call doc.Save (True, False)
Next, compose a document using this form.
11. Choose Create - OLE 2 Document from the menu bar.
12. Click the Link an Object from a File button. A message is displayed.
Your Notes document should look like this:
Note You will receive an error message if the object file does not exist
or if it is being used by another process.
13. Click Yes to save the document.
14. Click OK to close the document.
Next, open the document.
15. Display the Access OLE 2 view and open the document listed in the
Linking category.
Chapter 11: Using Notes as an OLE 2 Automation Client: Creating Objects 187