如何导出驻留在给定 Domino 服务器上的数据库列表？

Question

我有一台 Lotus Domino 服务器，上面有数量惊人的 Domino 数据库，排列在各个文件夹中。

是否有某种方法可以以某种电子表格格式导出所有这些数据库及其标题和创建者姓名的列表？ 我拥有 Domino Admin 和 Domino Designer 软件，并且我拥有或可以获得我需要的任何访问权限。

Answer 1

一个鲜为人知的事实是，您可以在管理客户端中“全选”并粘贴到 Excel 中。 还有一个选项用于数据库的平面视图而不是文件夹视图。

数据库的创建者没有列出，但还有很多其他有用的信息

Answer 2

继承了一些遗留服务器，不是吗？

如果过去对服务器进行了明智的维护，那么您已经拥有以下内容：

• catalog.nsf 数据库，这正是您想要的，只是更好地
• 启动并运行catalog服务器任务。

目录任务是自动构建和维护catalog.nsf数据库的任务。 如果它尚未运行，您可以在 Domino admin 的服务器控制台上启动它一次：
加载目录

甚至更好，将其添加到服务器的notes.ini 中的服务器任务中

现在，目录任务仅涵盖其属性已设置（例如允许编目）的数据库。 一个行为良好的 Domino 管理员不会允许数据库在没有正确设置这些属性的情况下进入生产环境（我相信这是默认设置），但看起来您并不完全处于名义情况。

如果这还不够并且如果你有时间修改，我曾经遇到过类似的情况，我用一些相当高级的脚本构建了一个数据库来进行彻底的人口普查，包括代理商及其时间表等等。如果您愿意，我很乐意将其传递给您。

尽情享受你的新玩具吧！

Answer 3

实际上，您可以使用一个非常简单的 Lotuscript 代理连接到服务器并使用 NotesDbDirectory 类遍历服务器上的所有数据库。 下面是一些代码，根据 6.5 帮助文件中的内容稍作修改 - 这会将所有数据库的标题和路径转储到 csv 文件。 注意：GetFirstDatabase 方法的一个参数让您指定要扫描服务器上的哪些对象 - 1247 是“数据库”的常量 - 基本上是所有 NSF 文件。 还有其他常量仅用于查找模板（NTF）、仅启用复制的数据库等。

Sub Initialize
    Dim db As NotesDatabase
    Dim f As Integer
    f = Freefile
    Open "c:\dbExport.csv" For Output As #f

    Dim dbdir As New NotesDbDirectory("")  ' opens LOCAL - put a server name here
    Set db = dbdir.GetFirstDatabase(1247)  ' all databases - NSF, NSG and NSH (no templates)
    While Not(db Is Nothing)
        Print #f, """" + db.Title + """, """ + db.FileName + """"
        Set db = dbdir.GetNextDatabase
    Wend
    Close #f
End Sub

Answer 4

您可能认为 Domino Admin 中有办法，但没有办法导出列表。 因此，我认为最好的选择是使用域目录数据库。 要构建它，请进入服务器配置文档> 服务器任务> 并打开域目录。 然后，catalog.nsf 数据库将被构建，并将包含您域中的所有数据库。 您可以自定义视图以包含您需要的信息。

最后，您可以进入视图，选择所有文档，然后单击“编辑”>“ 将选定内容复制为表。 然后将其粘贴到电子表格中。