Lotus notes 复制Lotus脚本中的项目不起作用

Lotus notes 复制Lotus脚本中的项目不起作用,lotus-notes,lotusscript,Lotus Notes,Lotusscript,有一个表单包含富文本字段,其中包含文本和文档链接。 我想在调度代理上发送一封邮件,内容从富文本字段进入邮件正文 我面临的问题是,当我使用以下命令时,只有最后一行和文档链接进入正文: Set item=doc.GetFirstItem正文 设置备忘=新备忘文档数据库 memo.Form=备忘录 memo.Subject=这是评论的副本。 Call memo.CopyItem项目,正文 任何人都可以提出一些建议吗?NotesDocument.CopyMemo应该可以正常工作,但如果不能正常工作,此代

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

我面临的问题是,当我使用以下命令时,只有最后一行和文档链接进入正文:

Set item=doc.GetFirstItem正文 设置备忘=新备忘文档数据库 memo.Form=备忘录 memo.Subject=这是评论的副本。 Call memo.CopyItem项目,正文 任何人都可以提出一些建议吗?

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)

我认为这会将备忘录的内容添加到项目中,但我需要反之亦然,第二个参数应该是什么?doc?item.CopyItemToDocumentmemo将属于当前doc的项目复制到备忘录文档。调用item.CopyItemToDocumentmemo,Body@CasperSkovgaard第二个参数不是必需的,除非新项的名称不同。