Hallo Leute,
hab schon viel hier im Forum gesucht, aber nichts wirklich gefunden. Habe eine Tabelle mit mehreren Reitern und in jedem Reiter eine Eingebettete Ansicht mit mehreren Dokumenten. Aber ich weiß nicht genau, wie ich an das markierte Element der aktuellen Ansicht herankomme. Wenn ich es mit UnprocessedDocuments versuche, dann gibt der irgendwie keins zurück.
Hier mal ein kleiner Auszug meines Scripts:
Dim uiws As New NotesUIWorkspace
Dim sess As New NotesSession
Dim db As NotesDatabase
Dim uidocDokument As NotesUIDocument
Dim docAktuellesDokument As NotesDocument
Dim dcSelektierteDokumente As NotesDocumentCollection
Dim varWert As Variant
Dim docTicket As NotesDocument
Set db = sess.CurrentDatabase
Set dcSelektierteDokumente = db.UnprocessedDocuments
Set docAktuellesDokument = dcSelektierteDokumente.GetFirstDocument
If dcSelektierteDokumente.count>0 Then
doch dcSelektierteDokumente.count gibt immer 0 zurück. Kann mir vll. jemand helfen?
Schonmal vielen Dank im voraus!
Daniel
Kein Problem.
Du erstellst eine neue ScriptLibrary und importierst über das Menu "File\Import" die Datei "SelectedDocsList.lss", die du dir zuvor runtergeladen hast und speicherst diese unter beispielsweise "SelectedDocsListClass".
In den Script, dass die ausgewählten Dokumente verarbeiten soll, gibst du unter "(Options)" mit dem Keyword Use "SelectedDocsListClass"
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set view = db.GetView("All docs")
Dim selected As New SelectedDocsList(view)
Print "Count = " & selected.Count
Set doc = selected.GetFirstDocument
Do Until (doc Is Nothing)
Print doc.NoteID & " was created on " & doc.Created
Set doc = selected.GetNextDocument(doc)
Loop
Wobei du hier im String "All docs" den Namen deiner Ansicht angeben musst. Die Objektvariable "selected", der das View-Objekt übergeben wurde, gibt dir dann die Dokument wie in einer NotesDocumentCollection zurück (s. Beispiel "selected.GetFirstDocument" für das erste Dokument und "selected.GetNextDocument(doc)" für die darauf folgenden Dokumente).