RE: Extract Embedded Object - Not Attachment - to a file Adam Mishcon 15.Mar.01 08:34 PM a Web browser Notes Client -- Other Release 4
Try:
Dim rtitem As notesrichtextitem
Dim object As Variant
Dim handle As Variant
Set rtitem = rdoc.GetFirstItem( "fieldname" )
Set object = rtitem.GetEmbeddedObject("Microsoft Word Document")
Set handle = object.Activate( False )
handle.SaveAs("c:\filename.doc")
Return to top
. . RE: Extract Embedded Object - Not A... (Adam Mishcon 15.Mar.01) 
Print this page
