我正在使用DIIOP访问莲花笔记。我正在尝试查找存在电子邮件的文件夹。我有电子邮件的Unid来找到该文件夹。
启用文件夹引用对我来说不是一个选项,因为我将处理一个运行多年的生产系统。
有什么方法可以找到使用DIIOP存在邮件的文件夹unid / name吗?
答案 0 :(得分:2)
如果没有文件夹引用,则文档不包含有关所驻留文件夹的信息。
唯一的可能性是浏览所有文件夹并检查文档是否在allentries-集合中。
代码可能看起来像这样(我不擅长Java,所以这是LotusScript-Code,但Java将使用相同的方法/类):
Dim db as NotesDatabase
Dim doc as NotesDocument
Set db = ... database that you work on
Set doc = .... document that you work on
Dim fc As NotesViewEntryCollection
Dim fe As NotesViewEntry
ForAll f In db.AllViews
If f.IsFolder Then
Set fc = f.AllEntries '- get all entries in folder
Set fe = fc.GetEntry( doc ) '- try to get object for doc from folder
If not fe is Nothing then
'- This document is in this folder... remember foldername, do whatever....
End If
End If
End ForAll