嵌入式视图上的 Lotus Notes UnprocessedDocuments
Lotus Notes UnprocessedDocuments on embedded view
我有一个带有嵌入式视图的文档...在这个嵌入式视图中,我有一个编译一些代码的按钮。
在这段代码中,我有 Set Coll=db.unprocesseddocuments
指令,所以当我在这个嵌入式视图中 select 文档时,我认为集合是由我有 select 的文档组成的。
但是该集合包含当前的 uiwork 文档,而不是我在嵌入式视图中拥有 select 的文档。为什么 ?如何使用嵌入视图的 selected 文档填充集合?
使用 @command([toolsrunmancro];"MyAgent") 而不是按钮内的简单代码,结果是相同的......
有人可以帮助我吗?
这个例子对我有用:
视图中的操作按钮 "Test" (LotusScript)
Sub Click(Source As Button)
Dim session As New NotesSession
Dim db As NotesDatabase
Dim col As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set col = db.UnprocessedDocuments
Set doc = col.GetFirstDocument
While Not doc Is Nothing
Print doc.UniversalID
Set doc = col.GetNextDocument(doc)
Wend
End Sub
嵌入式视图属性是
在嵌入式视图中选择文档后,单击操作按钮 "Test" 打印所有选定文档的通用 ID。
我认为 Knut 的答案的关键在于所讨论的按钮必须是嵌入式视图中的操作按钮,而不是表单上的按钮。
我有一个带有嵌入式视图的文档...在这个嵌入式视图中,我有一个编译一些代码的按钮。
在这段代码中,我有 Set Coll=db.unprocesseddocuments
指令,所以当我在这个嵌入式视图中 select 文档时,我认为集合是由我有 select 的文档组成的。
但是该集合包含当前的 uiwork 文档,而不是我在嵌入式视图中拥有 select 的文档。为什么 ?如何使用嵌入视图的 selected 文档填充集合?
使用 @command([toolsrunmancro];"MyAgent") 而不是按钮内的简单代码,结果是相同的......
有人可以帮助我吗?
这个例子对我有用:
视图中的操作按钮 "Test" (LotusScript)
Sub Click(Source As Button)
Dim session As New NotesSession
Dim db As NotesDatabase
Dim col As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set col = db.UnprocessedDocuments
Set doc = col.GetFirstDocument
While Not doc Is Nothing
Print doc.UniversalID
Set doc = col.GetNextDocument(doc)
Wend
End Sub
嵌入式视图属性是
在嵌入式视图中选择文档后,单击操作按钮 "Test" 打印所有选定文档的通用 ID。
我认为 Knut 的答案的关键在于所讨论的按钮必须是嵌入式视图中的操作按钮,而不是表单上的按钮。