Visual Basic.NET ExampleAfter you received the emails from email server to the local folder, we can use the following code to parse the email now. The following code demonstrates how to parse from, to, cc, subject, body text, attachments of specified EML file.
' The following example codes demonstrate parsing email (*.EML) file
' To get full sample projects, please download and install EAGetMail on your machine.
' To run it correctly, please change email server, user, password, folder, file name value to yours
Imports System.Collections
Imports System.Text
Imports System.IO
' Imports EAGetMail namespace
Imports EAGetMail
Module Module1
Private Sub ParseEmail(ByVal emlFile As String)
Dim oMail As New Mail("TryIt")
oMail.Load(emlFile, False)
' Parse Mail From/Sender
Console.WriteLine("From: {0}", oMail.From.ToString())
' Parse Mail To/Recipient
Dim addrs As MailAddress() = oMail.[To]
For i As Integer = 0 To addrs.Length - 1
Console.WriteLine("To: {0}", addrs(i).ToString())
Next
' Parse Mail CC
addrs = oMail.Cc
For i As Integer = 0 To addrs.Length - 1
Console.WriteLine("To: {0}", addrs(i).ToString())
Next
' Parse Mail Subject
Console.WriteLine("Subject: {0}", oMail.Subject)
' Parse Mail Text/Plain body
Console.WriteLine("TextBody: {0}", oMail.TextBody)
' Parse Mail Html Body
Console.WriteLine("HtmlBody: {0}", oMail.HtmlBody)
' Parse Attachments
Dim atts As Attachment() = oMail.Attachments
For i As Integer = 0 To atts.Length - 1
Console.WriteLine("Attachment: {0}", atts(i).Name)
Next
End Sub
Sub Main()
ParseEmail("c:\my folder\test.eml")
End Sub
End Module
If you have any comments or questions about above example codes, please add your comments here.
