我有一个带有视图控件的XPage。在该视图控件上,我有一个复选框选择,以便可以选择一个或多个文档。在相同的视图控件上,有一个按钮。在按钮下,我调用SSJS创建文档并保存新创建的文档,然后将新创建的文件呈现给用户视图XPage。 (不确定这很重要,但新创建的文档是包含Subject,SendTo,CopyTo,From,Form等的邮件消息)。在新保存的文档上,有另一个按钮通过以下方式调用lotuscript代理:
document1.save();
var id = document1.getDocument().getNoteID();
var agent = database.getAgent("(SendMemo)");
agent.run(id)
(SendMemo)非常简单,使用以下代码:
on error goto errorlog
dim s as new notessession
set db = session.currentdatabase
dim agent as NotesAgent
set agent = session.CurrentAgent
dim UNID as string
UNID= agent.ParameterDocID;
dim mydoc as notesdocument
set mydoc = db.getDocumentByID(UNID)
mydoc.sendDaily= "No"
call mydoc.ConvertToMIME(2)
Call mydoc.save ( true, false)
call mydoc.send(False) ****************
Exit sub
errorlog:
.....
end sub
如果未对邮件进行任何更改,则邮件会正确邮寄而不会出现问题。但是,如果任何文本被更改,则代理程序无法完成(在 * **** 时失败)并且错误是
"Notes error: The Cryptographic key was not found"
我尝试了以下变体:
call mydoc.send ( true)
call mydoc.send ( false, recipient)
任何想法?我的邮件文件没有打开加密功能。我看到的唯一的事情是“我发送的签名消息”,但是已经检查但是变灰了所以不能改变。
答案 0 :(得分:1)