Hi Everyone,
I've found a nifty liitle agent that tells you which folder an email is in from say 'all documents'. This is the code:
(from:
I've found a nifty liitle agent that tells you which folder an email is in from say 'all documents'. This is the code:
(from:
Code:
Dim sess As New notessession
Dim db As notesdatabase
Set db = sess.currentdatabase
db.FolderReferencesEnabled = True
Dim docs As NotesDocumentCollection
Dim doc As NotesDocument
Set docs = db.unprocesseddocuments
Set doc = docs.getfirstdocument
While Not(doc Is Nothing)
Forall folder In doc.FolderReferences
If folder <> "" Then
Msgbox doc.subject(0) & " -> folder: " & folder
End If
End Forall
Set doc = docs.GetNextDocument(doc)
Wend
[code/]
This works fine but I'd like to make it so that it's combined into a view. I've copied the 'all documents' view and tried to use the @command([toolsrunmacro];"<name of agent>") but it throws up an error and so I don't think this is the way to do it.
Please could anyone adivse?
Many thanks in advance.
RodP