Lotus Notes - Agent der Liste in Mail ausgibt

Hallo zusammen,

ich arbeite zur Zeit an einem Problem, dessen Lösung mir einfach nicht gelingen will. Vielleicht denke ich auch zu kompliziert, aber es will einfach nicht funktionieren.

Es geht um folgenden:

Es soll ein Agent in einer Notes-Datenbank geschrieben werden, der bestimmer Felder aus einem Notesdokument bezieht und in der Mail ausgibt, das klappt soweit auch schon. Der Agent geht die Dokumente eines nach dem anderen durch und Überträgt deren Inhalte in die Mail und versendet sie.

Nun soll ich zuätzlich eine Liste in die Mail einbauen.

Vorgegeben sind die Felder Materialgruppe, Mehrung (Anzahl der Meter) und Maßeinheit der Mehrung (Meter). Die Liste soll die Mehrung aller Felder mit der selben Materialgruppe summieren und ausgeben, doch genau das ist der Punkt an dem ich nicht voran komme.

Mit Arrays soll nicht gearbeitet werden!

Mein bisheriger Ansatz:

Dim AusgabeListe List As String


[...]

'Kopfzeile der Liste	

Ausgabeliste(1) = |"Materialgruppe"+| +"Maßeinheit"+| +"Mehrung"|


'Feldnamen der Notesdokumentfelder	

Ausgabeliste(2) = |f_Materialgruppe| + f_Maßeinheit + |f_Mehrung|


If Iselement(overviewlist("doc.vaMATKL_1")) = True Then

	If Iselement(overviewlist("doc.vaIPPUoM_1")) = True Then

		'Hier sollte die Aufsummierung folgen

Doch genau hier ist die Stelle an der ich nicht weiterkomme, vielleicht ist es auch der falsche Ansatz. Bin leider noch neu in diesem Bereich und würde mich über Hinweise und Tipps freuen.