开放标准、开放源码和 Domino 6: 通过 Python 和 Java 访问 Domino Directory

核心提示： dxldoc 代理dxldoc 代理生成 Domino Directory 中存储的文档的 DXL 格式，这使 Python 程序可以读取文档并从中检索信息，开放标准、开放源码和 Domino 6: 通过 Python 和 Java 访问 Domino Directory(4)，要使用 d

dxldoc 代理

dxldoc 代理生成 Domino Directory 中存储的文档的 DXL 格式。这使 Python 程序可以读取文档并从中检索信息。要使用 dxldoc 代理，需要从 Sandbox 复制该代理，然后使用 Domino Designer 将其粘贴到定制 Domino Directory 中。

代理的第一部分将声明所有必需的 Notes 对象：

Sub Initialize
　　'declare notes objects
　　Dim s As New notessession
　　Dim db As notesdatabase
　　Dim doc As notesdocument
　　Dim doc1 As notesdocument
　　Set doc1 = s.DocumentContext

然后，代理将内容类型设置为 XML 格式，以将其输出到请求应用程序：

　　Print "Content-type: text/xml"
　　On Error Goto err1
　　
　　Set db = s.currentdatabase
　　
　　Print ""

以下这些行将解析文档的 URL，以获得其 UNID：

　　Dim stg As String
　　stg = doc1.Query_String(0)
　　If Len(stg) < 5 Then
　　　　Goto err1
　　End If
　　If Instr(stg,"unid=") < 1 Then
　　　　Goto err1
　　Else
　　　　stg =　Right(stg,Len(stg)-Instr(stg,"="))
　　　　'Print stg
　　End If
　　Set doc = db.GetDocumentByUnID(stg)

下面这些行将声明 DXL 特定数据：

　　Dim exporter As NotesDXLExporter
　　Dim stream As notesstream
　　Set exporter = s.CreateDXLExporter
　　Set stream = s.CreateStream
　　Call exporter.SetInput(doc)

现在，该代理将 Person 文档处理为 DXL 格式：