解析电子邮件地址

问题描述：

我在Outlook 2007中编写VBA代码以从电子邮件中提取电子邮件地址。解析电子邮件地址

我能够通过可变

读取体作为一个整体如何从变量中提取电子邮件地址？

答

一种方法描述为here。

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)

答

为什么身体？你看过MailItem.Recipients集合（Recipient.Address）和MailItem.SenderEmailAddress属性吗？

我相信地址是邮件正文的一部分。不是收件人。 – niton 2015-04-06 16:53:03

这就是*原创海报*所考虑的内容吗？我想知道为什么身体而不是收件人需要处理。如果数据在消息体中，谁放在那里？它是否采用特殊格式？ – 2015-04-06 17:47:44

电子邮件的正文位于“变量”中。 OP想要解析变量。未来的搜索者可能会发现这是他们问题的答案。 – niton 2015-04-06 22:14:04

解析电子邮件地址

相关推荐