Lotus notes 在lotus notes中使用Dialogbox更改多个文档中的数据

Im创建代理以使用对话框更改多个文档（在视图中选定）中的特定字段。 这是我目前的代码：

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.

只需使用NotesDocumentCollection的“StampAll”方法

调用g_col.StampAll（“ItemName”、“NewValue”）

只需使用NotesDocumentCollection的“StampAll”方法

调用g_col.StampAll（“ItemName”、“NewValue”）

只需使用NotesDocumentCollection的“StampAll”方法

调用g_col.StampAll（“ItemName”、“NewValue”）

只需使用NotesDocumentCollection的“StampAll”方法

调用g_col.StampAll（“ItemName”、“NewValue”）