在 lotus notes 中使用对话框更改多个文档中的数据

Changing data in multiple documents using Dialogbox in lotus notes

我正在创建代理以使用对话框更改多个文档(在视图中选择)中的特定字段。 到目前为止,这是我的代码:

Sub Initialize
Dim s As New NotesSession 
Dim db As NotesDatabase 
Dim g_doc As NotesDocument
Dim g_col As NotesDocumentCollection    
Dim ws As New NotesUIWorkspace  
Set db = s.CurrentDatabase  
Set g_col = db.Unprocesseddocuments
Set g_doc = g_col.Getfirstdocument


Call ws.Dialogbox("(book_data_agent)", True, True, False, True, False, False, "Change data")


 Its easy to change fields for one document, but now im stuck when I try to change values in all selected documents.

只需使用 "StampAll"- NotesDocumentCollection 的方法。

Call g_col.StampAll( "ItemName", "NewValue" )