Retrieve Email with Event Handler in C++/CLI/CLR¶

#include "stdafx.h"

using namespace System;
using namespace System::Globalization;
using namespace System::IO;
using namespace EAGetMail; //add EAGetMail namespace

System::Void OnConnected(Object ^sender, System::Boolean % cancel)
{
    Console::WriteLine("Connected");
}

System::Void OnQuit(Object ^sender, System::Boolean % cancel)
{
    Console::WriteLine("Quit");
}

System::Void OnReceivingDataStream(Object ^sender, MailInfo ^info,
    int received, int total, System::Boolean % cancel)
{
    Console::WriteLine(String::Format("Receiving {0}, {1}/{2}...", info->Index,
        received, total));
}

System::Void OnIdle(Object ^sender, System::Boolean % cancel)
{
}

System::Void OnAuthorized(Object ^sender, System::Boolean % cancel)
{
    Console::WriteLine("Authorized");
}

System::Void OnSecuring(Object ^sender, System::Boolean % cancel)
{
    Console::WriteLine("Securing...");
}

// Generate an unqiue email file name based on date time
static String ^ _generateFileName(int sequence)
{
    DateTime currentDateTime = DateTime::Now;
    return String::Format("{0}-{1:000}-{2:000}.eml",
        currentDateTime.ToString("yyyyMMddHHmmss", gcnew CultureInfo("en-US")),
        currentDateTime.Millisecond,
        sequence);
}

int main(array<System::String ^> ^args)
{
    try
    {
        // Create a folder named "inbox" under current directory
        // to save the email retrieved.
        String ^localInbox = String::Format("{0}\\inbox", Directory::GetCurrentDirectory());

        // If the folder is not existed, create it.
        if (!Directory::Exists(localInbox))
        {
            Directory::CreateDirectory(localInbox);
        }

        MailServer ^oServer = gcnew MailServer("pop3.emailarchitect.net",
            "test@emailarchitect.net",
            "testpassword",
            ServerProtocol::Pop3);

        // Enable SSL/TLS connection, most modern email server require SSL/TLS by default
        oServer->SSLConnection = true;
        oServer->Port = 995;

        // if your server doesn't support SSL/TLS, please use the following codes
        // oServer->SSLConnection = false;
        // oServer->Port = 110;

        Console::WriteLine("Connecting server ...");

        MailClient ^oClient = gcnew MailClient("TryIt");

        // Catching the following events is not necessary,
        // just make the application more user friendly.
        // If you use the object in asp.net/windows service or non-gui application,
        // You need not to catch the following events.
        // To learn more detail, please refer to the code in EventHandler region
        oClient->OnAuthorized += gcnew MailClient::OnAuthorizedEventHandler(&OnAuthorized);
        oClient->OnConnected += gcnew MailClient::OnConnectedEventHandler(&OnConnected);
        oClient->OnIdle += gcnew MailClient::OnIdleEventHandler(&OnIdle);
        oClient->OnSecuring += gcnew MailClient::OnSecuringEventHandler(&OnSecuring);
        oClient->OnReceivingDataStream +=
            gcnew MailClient::OnReceivingDataStreamEventHandler(&OnReceivingDataStream);
        oClient->OnQuit += gcnew MailClient::OnQuitEventHandler(&OnQuit);

        oClient->Connect(oServer);

        array<MailInfo^> ^infos = oClient->GetMailInfos();
        Console::WriteLine("Total {0} email(s)\r\n", infos->Length);

        for (int i = 0; i < infos->Length; i++)
        {
            MailInfo ^info = infos[i];
            Console::WriteLine("Index: {0}; Size: {1}; UIDL: {2}",
                info->Index, info->Size, info->UIDL);

            // Generate an unqiue email file name based on date time
            String^ fileName = _generateFileName(i + 1);
            String^ fullPath = String::Format("{0}\\{1}", localInbox, fileName);

            // Receive email from POP3 server
            Mail ^oMail = oClient->GetMail(info);
            Console::WriteLine("From: {0}", oMail->From->ToString());
            Console::WriteLine("Subject: {0}\r\n", oMail->Subject);

            // Save email to local disk
            oMail->SaveAs(fullPath, true);

            // Mark email as deleted from POP3 server.
            oClient->Delete(info);
        }

        // Quit and expunge emails marked as deleted from POP3 server.
        oClient->Quit();
        Console::WriteLine("Completed!");
    }
    catch (Exception ^ep)
    {
        Console::WriteLine(ep->Message);
    }

    return 0;
}