關聯工具：Spire.Email for .NET

代碼片段：

Step 1:加載郵件。

MailMessage mail = MailMessage.Load("Sample.msg");

Step 2:創建一個新的StringBuilder實例。

StringBuilder sb = new StringBuilder();

Step 3:獲取我們想要的消息內容。

//get the From address
sb.AppendLine("From:");
sb.AppendLine(mail.From.Address);
//get the To address
sb.AppendLine("To:");
foreach (MailAddress toAddress in mail.To)
{
    sb.AppendLine(toAddress.Address);
}
//get the date
sb.AppendLine("Date:");
sb.AppendLine(mail.Date.ToString());
//get the subject
sb.AppendLine("Subject:");
sb.AppendLine(mail.Subject);
//get the BodyText
sb.AppendLine("Message contents");
sb.AppendLine(mail.BodyText);
//get the BodyHtml
sb.AppendLine("BodyHtml");
sb.AppendLine(mail.BodyHtml);

Step 4:寫入.txt中的所有內容

File.WriteAllText("ExtractMessageContents.txt", sb.ToString());

提取的.text文件格式的消息內容如下：

完整代碼：

[C#]

{
    MailMessage mail = MailMessage.Load("Sample.msg");
    StringBuilder sb = new StringBuilder();
    sb.AppendLine("From:");
    sb.AppendLine(mail.From.Address);
    sb.AppendLine("To:");
    foreach (MailAddress toAddress in mail.To)
    {
        sb.AppendLine(toAddress.Address);
    }
    sb.AppendLine("Date:");
    sb.AppendLine(mail.Date.ToString());
    sb.AppendLine("Subject:");
    sb.AppendLine(mail.Subject);
    sb.AppendLine("Message contents");
    sb.AppendLine(mail.BodyText);
    sb.AppendLine("BodyHtml");
    sb.AppendLine(mail.BodyHtml);
    File.WriteAllText("ExtractMessageContents.txt", sb.ToString());
}

[VB.NET]

Dim mail As MailMessage = MailMessage.Load("Sample.msg")
Dim sb As New StringBuilder()
sb.AppendLine("From:")
sb.AppendLine(mail.From.Address)
sb.AppendLine("To:")
For Each toAddress As MailAddress In mail.[To]
    sb.AppendLine(toAddress.Address)
Next
sb.AppendLine("Date:")
sb.AppendLine(mail.[Date].ToString())
sb.AppendLine("Subject:")
sb.AppendLine(mail.Subject)
sb.AppendLine("Message contents")
sb.AppendLine(mail.BodyText)
sb.AppendLine("BodyHtml")
sb.AppendLine(mail.BodyHtml)
File.WriteAllText("ExtractMessageContents.txt", sb.ToString())

慧都控件網

熱門格式轉換工具在線訂購特惠中點擊查看>>>>