Notes/Domino 6 and 7 Forum : A little progress - How to show the originated folder of a deleted message

Hello guys. Thanks for all postings. I didn´t get the expected result yet but I´ve got some progress thanks to all of you. Here are the steps I´ve done:

1 - I´ve created an agent anywhere, just to enable FolderReferences on the MailFile.

Sub Initialize
Dim Session As New NotesSession
Dim DB As New NotesDatabase("SERVERNAME", "mail/MAILFILE.nsf")

If DB Is Nothing Then
Print "DB doesn´t exist"
Exit Sub
End If

Print DB.FolderReferencesEnabled
DB.FolderReferencesEnabled = True
End Sub

2 - After that, I´ve made a button on the "($SoftDeletions)" view to retrieve the originated folder name. When pressed, the originated folder name was printed on screen, just as predicted. As "($SoftDeletions)" is a View, its name is not considered as FolderReferences value.

Sub Click(Source As Button)
Dim Session As New NotesSession
Dim DB As NotesDatabase
Dim Col As NotesDocumentCollection
Dim Doc As NotesDocument

Set DB = Session.CurrentDatabase
Set Col = Db.UnprocessedDocuments

If Col.Count = 0 Then Exit Sub

Set Doc = Col.GetFirstDocument
Forall Folder In Doc.FolderReferences
Messagebox Folder
End Forall
End Sub

3 - The documents received/sent after the FolderReferences enablement (is this word correct??) acquired new fields: $FolderRef, $FolderRefFlags and $FolderRefID. Now I am trying to use this information to obtain the originated folder name in a view column.

I will share new informations as soon as I get them.

Regards to all,
Paulo Pedroso

Notes/Domino 6 and 7 Forum

Document Options

Search this forum

Forum views and search

Member Tools

RSS Feeds