Domino 9 und frühere Versionen > Entwicklung

DokumentCollection

<< < (8/8)

Thomas Schulte:
Also ich hab das jetzt mal vorwärts wie rückwärts probiert und bei mir hat das immer richtig gefunzt
Agent mit Run on Selected. folgenden

--- Code: ---Sub Initialize
Dim ordner As String
Dim auswahl As Integer   
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace   
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim newdoc As NotesDocument

Set db = session.CurrentDatabase
Set collection = db.UnprocessedDocuments

' Diese Abfrage wird übergangen
If collection.Count = 0 Then
Messagebox "Sie haben kein Dokument markiert!",0 + 16,"Achtung"
'Exit Sub
Else
Msgbox collection.count & " Dokumente wurden markiert - sie können über die Klasse" & Chr$(10) &_
"NotesDocumentCollection weiter bearbeitet werden"
End If
End Sub

--- Ende Code ---
im Agenten drin und den Agenten über eine Aktion in einer kategorisierten Ansicht mit folgendem

--- Code: ---@Command([ToolsRunMacro];"testSelect")

--- Ende Code ---
aufgerufen
Das funktioniert einwandfrei mit und ohne Kategorien, mit einem zwei oder fünzig Dokumenten. mit Dokumenten + Kategorien ...
Er zeigt mir in der Documentcollection immer nur die echten Dokumente an.

Navigation

[0] Themen-Index

[*] Vorherige Sete