Hi Christian,
> die frage ist nun wie ich die email strings aus dem body
> rausfiltere. nach @
Kommt drauf an, ob in der Mail irgendwelche Formatierungen sind.
Wenn z.B. vor und nach jeder Mailadresse ein Leerzeichen ist ungef�hr so:
arrText = Split(Body, " ")
For i = LBound(arrText) To UBound(arrText)
If Instr(arrText(i), "@") > 0 Then
' Sollte eine Mailadresse sein
' Evtl. noch ein bischen weiter �berpr�fen
End If
Next
Ciao
Buchi
| [aspgerman] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp
