Domino 9 und frühere Versionen > Entwicklung

GetAllDocumentsByKey

<< < (2/4) > >>

TMC:
Indem Du durch Deine Collection loopst, z.B.


--- Code: ---Dim nCounter As Long

Set doc = dc.GetFirstDocument
nCounter = 1
While Not(doc Is Nothing)
   Redim Preserve strMeinArray(nCounter)
   strMeinArray(nCounter) = doc.MEINFELD(0) & "         " & doc.UniversalID
   nCounter = nCounter + 1
   Set doc = dc.GetNextDocument(doc)
Wend
--- Ende Code ---

koehlerbv:
Zwei Anmerkungen:
Bei der (durchaus üblichen) Methode, für ein NotesUIWorkspace.Prompt ein Array zu bilden, muss man darauf achten, dass die 64k-Grenze für das Array nicht überschritten wird.

Das Redim Preserve ist bei der von Matthias vorgestellten Variante unnötig. Mit NotesDocumentCollection.Count kennen wir ja bereits die Dimension des erforderlichen Arrays, daher reicht ein
Redim strMeinArray (dc.Count - 1) (wenn Option Base 0 ist).

Bernhard

TMC:

--- Zitat von: koehlerbv am 21.06.04 - 23:19:38 ---daher reicht ein
Redim strMeinArray (dc.Count - 1) (wenn Option Base 0 ist).
--- Ende Zitat ---

Ähm, dann aber trotzdem mit "Preserve" oder?

Matthias

koehlerbv:
Nö, wir müssen ja vorab nix "preserven" - wir pumpen die Daten ja erst nach dem Redim ins Array.

Bernhard

TMC:
Ach jetzt weiß ich was Du meinst.

Du setzt vorher den U- und LBound mit Redim ...(dc.Count), aber arbeitest nach wie vor mit dem Counter.
Klar, so macht das (auch performance-seitig) Sinn.

@skywook:
Ich hoffe wir haben Dich jetzt nicht zu sehr verwirrt  :)

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete