Stress mir wertzuweisungen aus Array

[SuperSonic]

Hallo NG,

ich habe ein kleines Problem mit der Wertzuweisung aus einem Array an eine Variable.
Ich denke, ich stehe mal wieder auf dem Schlauch.
(Was die Programmierung in Notes betrifft bin ich noch Frischling)

CodeSample:
Dim empfaenger(2) As String
Dim cName As String

empfaenger(0) = "mailtest01@abc.de"
empfaenger(1) = "mailtest02@abc.de"
empfaenger(2) = "mailtest03@abc.de"

In einer Schleife brauche ich dann den Wert von empfaenger() in der Variable cName
cName = empfaenger()

Nun bekomme ich aber immer den Fehler "Type mismatch on: EMPFAENGER"
Das Array ist wie die Variable vom Typ String.

Was mache ich hier falsch?

Gruß und Danke vorab
Michael

[DerAndre]

Welche Position hättense denn gerne aus empfaenger()?

Sag jetzt aber bitte nicht, daß das Array dem String zugewiesen werden soll.

[SuperSonic]

... das ist so, ich habe mir einen Agenten codiert, der ein AutoRepay absetzt wenn eine neue Mail eingeht. Das funktioniert bis hier auch noch richtig, nun soll der Kollege Agent auch noch die Mails nach dem Autoreplay entsprechend der Absenderadresse in entsprechende Ordner Verteilen und hierzu brauche ich für ein

if ... then ...

entweder einen Vergleich mit der in empfaenger() enthaltenen Adresse (flog grandios aufs maul) oder ich kippe zuerst die Adresse in eine Variable um dann damit zu arbeiten (geht auch nicht, fliegt bei "cName = empfaenger()" ab).
würg!

Eigentlich sollte doch 'if empfaenger() = "blubber@blabla.de" then call mail.putinfolder("archiv/001") doch laufen wenn
"dim empfaenger(2) as string" oder?

[DerAndre]

Nochmal:

Welche Position aus empfaenger() möchtest Du haben?

empfaenger() ist und bleibt ein Array von Strings.

Und "blubber@blabla.de" ist nur ein String.

[SuperSonic]

... Alle

ich habe eine Anzahl n Adressen die mit dem Inhalt von SendTo verglichen werden müssen.
Nur wenn da was dabei ist soll eine AutoReplay raus und verteilt werden.

Nun wird jede eingehende Mail auf diese Adressen geprüft.

While Not doc Is Nothing
'Überprüfung ob die EMail an eine vorher konfigurierte EMail-Adresse eingegangen ist
   Forall x In empfaenger()
      y = Instr(doc.SendTo(0), x)
      If y > 0 Then Goto mailversand
               
   End Forall
   Goto naechstesDokument

  ......

wend

das bis hier geht noch ...
nun versuche ich an der Stelle an der ich die AutoReplay generiere den Adressaten nochmals zu checken und dann die Mail in den zuständigen Ordner zu verschieben, d.h. ich vergleiche der Reihe nach alle ArrayAdressen mit SendTo.

[m3]

Alle Array-Werte mit Beistrich getrennt in einen String:

zielstring = Join( stringarray, ",")