Анализирайте имейл адреса

Пиша VBA код в Outlook 2007, за да извлека имейл адрес от имейли.

Мога да чета тялото като цяло чрез променлива

Как да извлека имейл адрес от променливата?


person VIRUS Hunter    schedule 21.01.2010    source източник


Отговори (2)


Един метод е описан тук.

sString = "[email protected] xxx [email protected] yyy [email protected]"
asString = Split(sString, " ")
For i = 0 To UBound(asString)
    If asString(i) Like "*@*.*" Then
        sEmail = sEmail & "," & asString(i)
    End If
Next

MsgBox Mid(sEmail, 2)
person niton    schedule 05.04.2015

Защо тялото? Разглеждали ли сте колекцията MailItem.Recipients (Recipient.Address) и свойството MailItem.SenderEmailAddress?

person Dmitry Streblechenko    schedule 05.04.2015
comment
Вярвам, че адресите са част от тялото на пощата. Не получатели. - person niton; 06.04.2015
comment
Това ли има предвид оригиналния плакат? Опитвам се да разбера защо трябва да се обработва тялото, а не получателите. И ако данните са в тялото на съобщението, кой ги е поставил там? В специален формат ли е? - person Dmitry Streblechenko; 06.04.2015
comment
Основният текст на имейла е в променливата. OP иска да анализира променливата. Бъдещите търсещи може да открият, че това е отговорът на въпроса им. - person niton; 07.04.2015
comment
Пропускате мисълта ми: OP анализира ли тялото на съобщението, защото той/тя не знае за другите свойства на съобщението? Или защото съобщението е изпратено от някакъв автоматизиран процес, който попълва тялото с имейл адреси? - person Dmitry Streblechenko; 07.04.2015