ansicht - button - mehrere aktionen

    hallo,
    habe folgendes vor
    - ansicht
    - dokument selected
    - über button folgendes aktionen
    a. antwortdokument erstellen zum markierten dokument
    b. nach dem a. gespeichert ist, soll gechecked werden ob fall xy zutrifft, dann ein weiteres antwortdokument erstellen


    ist dies so realisierbar?
    - tests endeten nach dem ersten call -
    - einzel aufgefufen funktionieren die aktionen -


    Sub Click(Source As Button)
    Dim workspace As New NotesUIWorkspace
    Call workspace.ComposeDocument( "", "", "e. Versand\1. L1" )

    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim collection As NotesDocumentCollection
    Dim doc As NotesDocument
    Set db = session.CurrentDatabase
    Set collection = db.UnprocessedDocuments
    Set doc = collection.GetFirstDocument()
    While Not(doc Is Nothing)
    Set item = doc.GetFirstItem( "firma1g" )
    If Len(item.text) <> 0 Then
    Call workspace.ComposeDocument( "", "", "e. Versand\1. L2" )
    End If
    Set doc = collection.GetNextDocument(doc)
    Wend
    End Sub

    Ja ist möglich.


    Pack die Aktionen in einen Agenten, der auf alle selektierten Dokumente läuft und ruf diesen von deiner Aktion aus auf.


    In dem Agenten musst du dann die UnprocessedDocuments durchgehen