MsgBox (mail.To) только адрес электронной почты

Question

Есть ли способ, которым я могу использовать следующую команду MsgBox (mail.To) в onitemsend, используя для возврата только адрес электронной почты и имя дружественного/псевдонима? Мне нужен только адрес электронной почты, поскольку он используется для поиска SQL по сравнению с нашим CRM. На данный момент, если я использую MsgBox (mail.To) я получаю:

Джо Bloggs (joe.bloggs@company.com) , но я хотел бы: joe.bloggs@company.com

I верьте, что это делает это, потому что Outlook просматривает электронную почту в моей адресной книге, потому что есть запись, которая не может помочь.

Большое спасибо

Answer 1

Попробуйте это:

Dim str As String = mail.To 
    Dim lst As String() = str.Split({" "}, StringSplitOptions.RemoveEmptyEntries) 
    Dim email As String = "" 
    For Each w1 In lst 
     If w1.Contains("@") Then 
      email = w1 
     End If 
    Next 
    email = email.Replace("(", "") 
    email = email.Replace(")", "") 
    MsgBox(email) 

Answer 2

Используйте кнопки MailItem.Recipients сбора и проходное всех получателей. Используйте свойства Recipient.Address/Name/Type.

Answer 3

Dim mail As New MailMessage() 
mail = New MailMessage() 
mail.From = New MailAddress("your@mail.com", "Your Firends Name") 

возможно?