我有一台 Lotus Domino 服务器,上面有数量惊人的 Domino 数据库,排列在各个文件夹中。
是否有某种方法可以以某种电子表格格式导出所有这些数据库及其标题和创建者姓名的列表?我拥有 Domino Admin 和 Domino Designer 软件,并且我拥有或可以获得我需要的任何访问权限。
实际上,您可以使用一个非常简单的 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
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)