Selected Documents Problem

In a VIEW the user will select some documents, click on an Action Button, the Action will prompt the user an InputBox where he can put his comments. The Action will Append the comments in a field on all of the selected document. The action will modify a Field so that the document will be shown in anothe view.

How will I do the above scenario?
On my trials to do it my self I come up with these questions:
How will I get the DocumentCollection that contains only the selected document?
How can I make an agent (that will process selected document) prompt an input box once and then begin the processing of the documents?
LVL 1
redenAsked:
Who is Participating?
 
Scott2000Commented:
Hi Reden,

I have not had time to debug this code, but it might just work........

Regards,

Scott.

Dim docCollection as NotesDocumentCollection
Dim dbCurrent as NotesDatabase
Dim session as New NotesSession
Dim strInput as String
Dim doc as NotesDocument

Set dbCurrent = session.CurrentDatabase
Set docCollection = dbCurrent.UnprocessedDocuments

If docCollection.Count = 0 then
   MsgBox "No documents selected"
   Exit Sub
End if

strInput = InputBox("Please enter your comments: ")

Set doc = docCollection.GetFirstDocument

While Not doc is nothing
   doc.ReplaceItemValue("FIELDNAME", doc.GetItemValue("FIELDNAME")+ ", " + strInput
   doc.Save True, True
   Set doc = docCollection.GetNextDocument(doc)
Wend
0
 
redenAuthor Commented:
I tried to use your sample code and modify a little bit, it worked.

then I review the UnprocessedDocuments method see it there myself. I though worked only with Agents.

Thanks and I'll give you the points
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.