E-Mail-Adressen zerlegen

Hallo,

möchte einen Satz der mehrere E-Mail-Adressen( jeweils getrennt durch :wink: beinhaltet, zerlegen und die einzelnen E-Mail Adressen
in eine Tabelle schreiben.

Wer kann mir helfen?
Vielen Dank.

Harry

Hallo Harry,

dies kann man mit einem Ansatz via InStr(…) und Mid(…)

allgemein:

Position erstes ‚;‘ via Instr(…) suchen
mittels Mid(…) die erste Adresse extrahieren

Dann eine Schleife mittels InStr(…) bis zum Ende
und jeweils mit Mid die Adresse auslesen

ich hoffe das bringt dich auf den richtigen Weg…
Tschau
Peter

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Moin,

ich würde mir das ganze in ein recordset laden und dann einfach durchgehen und pro rst(„deinadressfeld“) ungefähr das hier ausführen:

If Right(Trim(strMail), 1) ";" Then strMail = strMail & ";"
While Not (IsNull(strMail) Or Len(strMail) = 0)

 strEinzelMail = Trim(Left(strMail, InStr(1, strMail, ";") - 1))
 strMail = Trim(Right(strMail, Len(strMail) - InStr(1, strMail, ";")))

 xxxxxxxxxxxxxxxxxxxx

Wend

statt dem xxxxx halt dann einfach das Insert in die neue Tabelle hinpacken.

Gruß
Daniel Scholdei

Hi,

die Hilfe hat zu einem erfolgreichen Ergebnis geführt.
Dafür nochmals vielen Dank und schöne Grüße!

Harry