Lotus Notes - 从嵌入视图中排除当前文档

Question

我有一个嵌入式视图，我想从中排除当前文档。有办法做到这一点吗？视图选择正确并显示许多文档，其中包含包含嵌入视图的文档（我想要排除）。

Answer 1

在我看来，您没有机会从嵌入式视图中排除当前文档，因为您唯一的选择是在嵌入视图中显示单个类别。

解决方法可能是阻止当前文档打开：

Sub Queryopendocument(Source As Notesuiview, Continue As Variant)
    Dim docs As NotesDocumentCollection
    Dim doc As NotesDocument
    Set docs = Source.Documents
    Set doc = docs.GetFirstDocument

    Dim ws As New NotesUIWorkspace

    If doc.UniversalID = ws.CurrentDocument.Document.UniversalID Then
        Continue = False
    End If

End Sub

我希望这会有所帮助：）