首页 文章

在 Lotus Script 中复制项目无效

提问于
浏览
0

有一个包含富文本字段的表单,并且其中包含文本和文档链接。我想在预定的代理上发送一封邮件,该邮件的内容从富文本字段进入邮件正文。

我遇到的问题是,当我在下面使用时,只有最后一行和文档链接进入正文:

Set item = doc.GetFirstItem( "Body" ) Set memo = New NotesDocument( db ) memo.Form = "Memo" memo.Subject = "Here's a copy of the review." Call memo.CopyItem( item, "Body" )任何人都可以提出建议吗

1 回答

  • 0

    NotesDocument.CopyMemo应该可以正常运行,但是如果不能正常运行,则此代码可以解决您的任务:

    Dim currentDoc as NotesDocument
    Dim item as Variant
    Dim memo as NotesDocument
    
    '.....  initializing db, currentDoc & other code, etc ....
    
    Set item = currentDoc.getFirstItem("Body")
    Set memo = new NotesDocument(db)
    memo.Form = "Memo"
    memo.Subject = "Here's a copy of the review"
    
    Call item.CopyItemToDocument(memo)
    

相关问题