将文档移动到不同的类别

Question

我正在尝试在LotusScript中将文档从一个类别移动到另一个类别。

例如，我有两个人，他们已经购买了一些东西：

约翰：     purchase1     purchase2 鲍勃：     purchase3     purchase4

我想使用代理将所有Bob的购买移动到John的列表中。我对LotusScript没有任何意义，所以我不想让你为我编写代码。有人可以告诉我在哪里可以找到材料或指导如何解决这个问题或至少给我一个方向去看看？

Answer 1

您可以构建一个Lotus Script Agent来处理视图中标记的文档

    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim collDoc As NotesDocumentCollection
    Dim doc As NotesDocument
    Dim category As variant

    Set db = session.Currentdatabase
    'Get the selected documents
    Set collDoc = db.Unprocesseddocuments
    If(collDoc.Count > 0)Then
        Set doc = collDoc.Getfirstdocument()
        While Not doc Is Nothing
            'Get the current categories

            'Get the new categories

            'Set the new categories (+ use some of the old categories)

            'Save the changes

            Set doc = collDoc.Getnextdocument(doc)
        Wend
    End If

我的示例代码向您展示了如何获取已标记文档的句柄。在while循环中，您必须更改类别字段以将文档移动到新类别。