Domino 9 und frühere Versionen > ND8: Entwicklung

Wie zähle ich am besten Dokumente einer View?

<< < (2/5) > >>

schroederk:
Die View ist kategorisiert und die erste Spalte danach ist das Datum.

atbits:
Na dann nimm passe ich meinen Code doch wie folgt an:

--- Code: ---Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim vc As NotesViewEntryCollection
Set db = session.CurrentDatabase
Set view = db.GetView("By Category")
view.AutoUpdate = False
view.GetAllEntriesByKey(DATUMSSTRING)
Messagebox vc.Count

--- Ende Code ---

Jetzt braucht Du nur noch den DATUMSSTRING zu setzen

Peter Klett:
Set col = view.GetAllDocumentsByKey (datum, True)

Dann ist wieder col.Count die Anzahl der Dokumente (musst Du aber ausprobieren, da ich meine, dass die erste Spalte sortiert und Text sein muss, kann mich aber irren)

Edit: Oder so, wie David geschrieben hat, kommt aufs gleiche

schroederk:

--- Code: --- Dim todaysdate As New NotesDateTime("Today")
Dim dateTime As New NotesDateTime(todaysdate.DateOnly)
Dim keyarray(0) As Variant
Set keyarray(0) = dateTime

view.AutoUpdate = False
Set vc = view.GetAllEntriesByKey(keyarray, true)
Print vc.Count

--- Ende Code ---

gibt leider 0 zurück, obwohl da allein von heute Dokumente im dreistelligen Bereich existieren.
Zudem die Frage, wie ich auch nach nur dem Monat suchen kann.

atbits:
Na Du mußt erst noch todaysdate in einen passenden String konvertieren.
Für Monate mußt Du auf Peters Lösung mit der Search zurückgreifen, die kostet allerdings mehr Performance.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete