NotesDocumentCollection

[bikerboy]

Hallo Freunde,

Ich habe ein Problem mit einer NotesDocumentCollection.

Ich habe 2 dieser Collection einmal die

"Collection", sie wird ins Leben gerufen durch

Code

dim collection as NotesDocumentCollection

und gefüttert durch

Code

set collection = view.GetallDocumentsby(docID)

Dann fange ich eine 2. Collection an

Code

Dim newCollection as NotesDocumentCollection

.

Dann soll eine Schleife bestimmte Einträge aus der ersten Collection herrausfiltern.

Code

1   For i = 1 To colCount
2	docLifetime = Cint(doc.GetItemValue("lifetime")(0))		
3	If uiLifetime > docLifetime Then
4		Call newCollection.AddDocument(doc) 'Zusammenstellen einer neuen Collection.
5		Set doc = collection.GetNextDocument(doc)
6	Else
7		Set doc = collection.GetNextDocument(doc)
8	End If			
9   Next

aber, wenn die Zeile 4 ausgelöst wird, dann schmeisst er mir den Fehler "Object Variabel not set".
Aber warum ? Ich meine ich habe die Collection Dimensioniert und möchte sie nun füllen.

Ich hoffe ihr könnt mir weiter helfen.

[koehlerbv]

Du hast sie deklariert, mehr nicht. Einem Objekt zugeordnet ist sie so natürlich noch nicht.
Da die NotesDocumentCollection dummerweise kein New-Statement kennt, musst Du sie "mit nichts" füllen. Einfachster Weg (weitere finden sich im Forum mittels der Suche etliche): Du füllst sie mittels einer "unmöglichen Suche".

Bernhard

[bikerboy]

@koehlerbv

Du füllst sie mittels einer "unmöglichen Suche".

Was meinst du damit? Eine Suche die zu keinem Ergebnis kommt? Wie zum Beipiel view.getalldocumentsby(brabbel) ?

[Glombi]

Einfacher:

   Set dc = db.Search( |@False|,Nothing, 0 )

Andreas

[bikerboy]

@glombi

Danke für den Tipp war genau das was ich gebraucht habe.