Set rtitem=maildoc.CreateRichTextItem ("body") Dim object As NotesEmbeddedObject Set object = rtitem.EmbedObject _ ( EMBED_ATTACHMENT, "", "c:\jim.sam")创建body的 富文本对象.然后根据路径上传附件..然后doc.send 不知道可不可以这个 是help的例子.....
显示全部
Set rtitem=maildoc.CreateRichTextItem ("body")
Dim object As NotesEmbeddedObject
Set object = rtitem.EmbedObject _
( EMBED_ATTACHMENT, "", "c:\jim.sam")
创建body的 富文本对象.然后根据路径上传附件..然后doc.send 不知道可不可以
这个 是help的例子..
收起