Das Notes Forum

Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: MarkusL am 29.07.15 - 12:47:33

Titel: Fehler bei ArrayReplace
Beitrag von: MarkusL am 29.07.15 - 12:47:33
Halo zusammen,

ich möchte gerne 3 Arrays vergleichen und das Ergebnis ausgeben.
Leider erhalte ich bei dem Vergleich immer folgenden Fehler:
Fehler 232: Wrong number of array subscripts in Initialize in Zeile ....

So sieht mein Code aus:
   Dim sArrayDB() As String
   Dim sArrayB21() As String
   Dim sArrayFS() As String
   Dim sArrayVergleich

       Größe für die Arrays herausfinden...

   'Arrays definieren
   ReDim sArrayDB(1 To iCounterDB, 0)
   ReDim sArrayB21(1 To iCounterFileB21, 0)
   ReDim sArrayFS(1 To iCounterFileFS, 0)

       Arrays füllen....

       'Arrays vergleichen
       SArrayVergleich = ArrayReplace(sArrayDB , sArrayB21 , sArrayFS)
       Hier kommt dann der Fehler

Wäre schön, wenn mir jemand auf die Sprünge helfen kann.

Thanx
Markus
Titel: Re: Fehler bei ArrayReplace
Beitrag von: Peter Klett am 29.07.15 - 14:31:35
Ich denke nicht, dass das für mehrdimensionale Arrays funktioniert

Mit solch einer Dimensionierung geht das bestimmt

   'Arrays definieren
   ReDim sArrayDB(iCounterDB)
   ReDim sArrayB21(iCounterFileB21)
   ReDim sArrayFS(iCounterFileFS)
Titel: Re: Fehler bei ArrayReplace
Beitrag von: MarkusL am 29.07.15 - 16:45:24
Hallo Peter,

vielen Dank für die schnelle Info und es geht natürlich auf diese Weise.

Ich benötigte zwar weitere Infos für die Auswertung, aber die kann ich mir auch mit Hilfe der Ergebnisliste nachträglich holen.

Super!

Gruß Markus