Lotus notes 如何获取Lotus notes邮件文件列表'；业主姓名

我想知道是否有可能生成一个文本文件的电子邮件用户及其所有者列表？我是莲花脚本的初学者。。。domino administrator中是否有任何数据库？在哪里可以找到此类数据

您可以使用NotesDBDirectory类循环服务器上的所有数据库。如果数据库位于子文件夹mail中，则可以使用notes数据库类获取数据库。通常数据库的标题是所有者的名称。但您也可以获取日历配置文件文档并读取字段所有者

另一种方法：查看names.nsf。您可以将数据导出为CSV文件

格里茨，马库斯代码示例：

Dim sess as new Notessession
Dim dbdir as NotesDBDirectory
Dim db as NotesDatabase
Dim Profile As NotesDocument

Set dbdir = New NotesDBDirectory("Servername")
Set db = dbdir.GetFirstDatabase(1247)
Do until db is nothing
    'expecting the mail files are located in subfolder mail, check the path
    If Ucase(Left(db.FilePath , 5)) = "MAIL\" Then
         If not db.IsOpen Then
             Call db.Open("","")
         End If
         Set Profile = db.GetProfileDocument("CalendarProfile")
         Print Profile.Owner(0) ' prints out the owner name to Client Status bar or Server console
    End If
    Set db = dbdir.GetNextDatabase
Loop

线路

Print Profile.Owner(0) ' prints out the owner name to Client 

必须进行修改以符合您的需要。您可以使用lotusscriptwrite语句

请查看IBM帮助中心：

---

嗯，Markus

我会遍历服务器names.nsf中的用户文档。查看每个用户是否列出了电子邮件数据库，如果有，则将其输出到文本文件。

您的代码-说明正常，其他方法在这里没有帮助。。。但仍然+1从names.nsf导出不会为每个邮件文件获取已输入到配置文件文档中的所有者，但会获取指向该文件的目录项的全名。编写代码循环访问names.nsf，获取每个人和/或mailin数据库的服务器和路径，然后打开邮件文件，获取日历配置文件文档并读取所有者项，这是我的做法，因为并非所有邮件文件都必须在邮件子文件夹中，而且可能很容易有多个服务器，你是对的。。。我们只有一台服务器，所有邮件文件都位于邮件子文件夹中。这就是为什么我提到…我明白这是不可能的吗？当然是可能的。您发布的链接中的示例仅显示了当前数据库的代码。。。您需要访问notesdbdirectory循环中的数据库。