This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
RE: Agent to add readers field ~Holly Desveluzen 10.Mar.07 03:19 PM a Web browser Applications Development 7.0.1All Platforms
If you are running this code in an agent that acts on selected documents in a view, you need a little more code.
Dim session As New NotesSession
Dim db As NotesDatabase
Dim coll As NotesDocumentCollection
Dim doc As NotesDocument
Dim readersItem As NotesItem
Dim newValues( 1 To 2 ) As String
Set db = session.CurrentDatabase
Set coll = db.UnprocessedDocument
Set doc = coll.GetFirstDocument
While Not (doc Is Nothing)
Set readersItem = New NotesItem(doc, "docReaders", newValues, READERS)
Call doc.Save( True, True )
Set doc = coll.GetNextDocument(doc)
Wend