Lotus Notes 代理编辑器中没有“脚本区域”答案

【问题标题】：No "Script Area" in Lotus Notes Agent editorLotus Notes 代理编辑器中没有“脚本区域”
【发布时间】：2014-06-20 10:45:41
【问题描述】：

我需要这里描述的功能：Determining which folder contains a document in Lotus Notes without using the LotusScript FolderReferences property

它说：“以及脚本区域中的以下代码”。但是没有脚本区域。有一棵树包含“文档选择”、“（选项）”、“声明”、“初始化”和“终止”。

【问题讨论】：

标签： lotus-notes lotusscript

【解决方案1】：

您可以将该代码输入到 Initialize 方法的主体中。确保保留选择初始化时自动出现的代码，只需在中间输入代码

Sub Initialize

    Dim session As New notessession
    Dim db As notesdatabase
    Dim doc As notesdocument
    Dim doc2 As notesdocument
    Dim view As notesview
    Dim noteid1 As String
    Dim noteid2 As String
    Dim item As notesitem
    Dim collection As notesdocumentcollection
    Set db=session.CurrentDatabase
    Set collection=db.UnprocessedDocuments
    Set doc=collection.getfirstdocument
    noteid1=doc.NoteID
    Forall v In db.Views

        If v.isfolder Then
          Set doc2=v.GetFirstDocument
          While Not doc2 Is Nothing
            noteid2=doc2.NoteID
            If noteid1=noteid2 Then
                Messagebox v.name
            End If
            Set doc2=v.getnextdocument(doc2)
          Wend
        End If

    End Forall

End Sub

【讨论】：