Parse Mime message

This example shows you how to load existing mime message, enumerate all body parts and find body parts with html and plain text.

C# example

using System;
using Independentsoft.Email;
using Independentsoft.Email.Mime;

namespace Sample
{
    class Program
    {
        static void Main(string[] args)
        {
            string plainText = null;
            string htmlText  = null;

            Message message = new Message("c:\\testfolder\\message.eml");

            if (message.ContentType != null && message.ContentType.Type == "text" && message.ContentType.SubType == "plain")
            {
                plainText = message.Body;
            }
            else
            {
                BodyPartCollection allBodyParts = new BodyPartCollection();
                allBodyParts.Add(message.BodyParts);
                allBodyParts.Add(GetChildren(message.BodyParts));

                foreach (BodyPart bodyPart in allBodyParts)
                {
                    if (bodyPart.ContentType != null && bodyPart.ContentType.Type == "text" && bodyPart.ContentType.SubType == "plain")
                    {
                        plainText = bodyPart.Body;
                    }
                    else if (bodyPart.ContentType != null && bodyPart.ContentType.Type == "text" && bodyPart.ContentType.SubType == "html")
                    {
                        htmlText = bodyPart.Body;
                    }
                }
            }

            Console.WriteLine("Plain text body: " + plainText);
            Console.WriteLine("Html text body: " + htmlText);

            Console.Read();
        }

        private static BodyPartCollection GetChildren(BodyPartCollection bodyParts)
        {
            BodyPartCollection children = new BodyPartCollection();

            for (int i = 0; i < bodyParts.Count; i++)
            {
                children.Add(GetChildren(bodyParts[i].BodyParts));
                children.Add(bodyParts[i]);
            }

            return children;
        }
    }
}

VB example

Imports System
Imports Independentsoft.Email
Imports Independentsoft.Email.Mime

Namespace Sample
    Class Program
        Shared Sub Main(ByVal args As String())

            Dim plainText As String = Nothing
            Dim htmlText As String = Nothing

            Dim message As New Message("c:\testfolder\message.eml")

            If message.ContentType IsNot Nothing AndAlso message.ContentType.Type = "text" AndAlso message.ContentType.SubType = "plain" Then
                plainText = message.Body
            Else
                Dim allBodyParts As New BodyPartCollection()
                allBodyParts.Add(message.BodyParts)
                allBodyParts.Add(GetChildren(message.BodyParts))

                For Each bodyPart As BodyPart In allBodyParts
                    If bodyPart.ContentType IsNot Nothing AndAlso bodyPart.ContentType.Type = "text" AndAlso bodyPart.ContentType.SubType = "plain" Then
                        plainText = bodyPart.Body
                    ElseIf bodyPart.ContentType IsNot Nothing AndAlso bodyPart.ContentType.Type = "text" AndAlso bodyPart.ContentType.SubType = "html" Then
                        htmlText = bodyPart.Body
                    End If
                Next
            End If

            Console.WriteLine("Plain text body: " & plainText)
            Console.WriteLine("Html text body: " & htmlText)

            Console.Read()
        End Sub

        Private Shared Function GetChildren(ByVal bodyParts As BodyPartCollection) As BodyPartCollection

            Dim children As New BodyPartCollection()

            For i As Integer = 0 To bodyParts.Count - 1
                children.Add(GetChildren(bodyParts(i).BodyParts))
                children.Add(bodyParts(i))
            Next

            Return children
        End Function
    End Class
End Namespace

Independentsoft - any library, any programming language

Email .NET > Tutorial > Parse Mime message