Ich hab nun das Problem vereinfacht, komm aber immer noch nicht weiter,
und hoffe immer noch auf Hilfe:

Ich habe folgendes Recordset:

ID                      Wert
------------------------------------
18                      Auto
19                      Baum
120                     Baum
20                      Decke
21                      Dosen
121                     Dosen
22                      Gans
122                     Gans
235                     Gans
23                      Hase
160                     Hase
25                      Igel
26                      Kaffee

Ich darf jeden Wert jedoch nur einmal auflisten. Das Recordset ist
bereits nach Wert aufsteigend ( alphabetisch ) sortiert.
Wie ihr seht, gibt es Werte, die einmal oder auch �fter vorkommen.

Ich hab das Recordset in ein zweidimensionales Array umgewandelt:

Dim Arr
Arr = REC.Getrows

Nun m�chte ich folgende manipulation durchf�hren:

Wenn es einen Wert nur einmal gibt, soll dem Wert einfach die ID
zugeordnet bleiben. Gibt es aber mehrere Werte, sollen die Ids addiert
werrden. Das Ergebnis sollte folgende Erscheinung haben:

ID                      Wert
------------------------------------
18                      Auto
19, 120         Baum
20                      Decke
21, 121         Dosen
22, 122, 235    Gans
23, 160         Hase
25                      Igel
26                      Kaffee

Ich habe versucht, f�r die Schleife die Gr��e zu bestimmen, aber das
geht schon in die Hose:

Groesse = Ubound(Arr)                   <- da bekomm ich aber 0 als
Antwort, obwohl es eigentlich 68 Eintr�ge gibt

Der erste Eintrag Arr(0,i) hat hierbei den Inhalt der ID, der Zweite
Arr(1,i) hat den Wert.

Ich komm hier absolut nicht weiter. Last mich bitte nicht h�ngen.

Ein Freund aus Passau



| [aspdecoffeehouse] als archive@jab.org subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp

Antwort per Email an