Domino 9 und frühere Versionen > ND6: Entwicklung

alle abwärts markieren

<< < (2/2)

Polarbaer:

--- Zitat von: diali am 25.05.05 - 10:55:59 ---3. mit NotesUIView.SelectDocument(NotesDocument) markieren

--- Ende Zitat ---

Kann es sein, dass man damit immer nur ein Dokument markieren kann und beim 2. nicht mehr klar ist, dass schon das erste markiert war?

diali:
NotesUIView.SelectDocument(NotesDocument) markiert immer nur ein Dokument, deshalb gehst Du im BackEnd auch durch alle vorhergehenden oder nachfolgenden Dokumente und markierst diese in der UIView.

Polarbaer:

--- Zitat von: diali am 27.05.05 - 06:12:24 ---NotesUIView.SelectDocument(NotesDocument) markiert immer nur ein Dokument, deshalb gehst Du im BackEnd auch durch alle vorhergehenden oder nachfolgenden Dokumente und markierst diese in der UIView.



--- Ende Zitat ---

Ich krieg es hin, im Backend alle Dokumente zu markieren, aber wenn der Agent zu Ende gelaufen ist, so ist nichts mehr markiert??? Sieht jemand, was ich falsch mache?

Sub Initialize
   Dim ws As New NotesUIWorkspace
   Dim uiview As NotesUIView
   Dim view As NotesView
   Dim mydoc As NotesDocument   
   Dim db As NotesDatabase
   Dim session As New NotesSession
   Dim collection As NotesDocumentCollection
   Dim doc As NotesDocument
   Set uiview = ws.CurrentView
   Set view = uiview.View
   Set db = session.CurrentDatabase
   Set collection = db.UnprocessedDocuments
   Set mydoc = collection.GetFirstDocument()
   Do While Not mydoc Is Nothing
      Call uiview.SelectDocument(mydoc)
      Set mydoc = view.GetNextDocument(mydoc)
   Loop
End Sub

Navigation

[0] Themen-Index

[*] Vorherige Sete