Parse Non-Delivery Report (NDR) in C++/CLI/CLR¶

#include "stdafx.h"

using namespace System;
using namespace System::IO;
using namespace System::Data::SqlClient;
using namespace EAGetMail;

static bool ParseEmail(String ^fileName, SqlConnection ^oConn)
{
    Mail ^oMail = gcnew Mail("TryIt");
    oMail->Load(fileName, true);

    // detect if this is a report or receipt
    if (!oMail->IsReport)
    {
        Console::WriteLine("Not a report or receipt!");
        return false;
    }

    MailReport ^oReport = oMail->GetReport();
    // we only process failure report
    if (oReport->ReportType != DeliveryReportType::FailureReport)
    {
        Console::WriteLine("Not a failure report!");
        return false;
    }

    Console::WriteLine( "OriginalRecipient: {0}", oReport->OriginalRecipient );
    Console::WriteLine( "ErrorCode: {0}", oReport->ErrCode );
    Console::WriteLine("ErrorDesc: {0}", oReport->ErrDescription);
    String ^errorDesc = oReport->ErrDescription;
    if (errorDesc->Length > 250)
        errorDesc = errorDesc->Substring(0, 250);

    // INSERT the result to database.
    String ^sql = "INSERT INTO [dbo].[Failure_Report] " +
        " ([address] " +
        " ,[error_code] "  +
        " ,[error_desc] "  +
        " ,[error_datetime]) " +
        " VALUES ( @address, @error_code, @error_desc, GETDATE())";

    SqlCommand ^command = gcnew SqlCommand(sql, oConn);
    command->Parameters->AddWithValue("@address", oReport->OriginalRecipient);
    command->Parameters->AddWithValue("@error_code", oReport->ErrCode);
    command->Parameters->AddWithValue("@error_desc", errorDesc);

    command->ExecuteNonQuery();
    return true;

}


int main(array<System::String ^> ^args)
{
    if (args->Length < 1)
    {
        Console::WriteLine("Usage: Parse_Reports.exe [email folder path]\r\n");
        Console::WriteLine("eg: Parse_Reports.exe \"c:\\my folder\"\r\n");
        return 0;
    }

    try
    {
// change it to your sql server address, database, user and password
// The server/instance name syntax used in the server option is the same for all SQL Server connection strings.
// e.g.: Server=serveraddress\\instancename;

// open database connection
SqlConnection ^oConn = gcnew SqlConnection("Server=localhost;Database=myDB;User Id=myUser;Password=myPassword;");
        oConn->Open();

        array<String^>^ files = Directory::GetFiles(args[0], "*.eml");
        Console::WriteLine("Total {0} email(s)", files->Length);
        int count = files->Length;
        for (int i = 0; i < count; i++)
        {
            String ^fileName = files[i];
            if (ParseEmail(fileName, oConn))
            {
                // Delete the local report file.
                File::Delete(fileName);
            }
        }

        oConn->Close();
    }
    catch (Exception ^ep)
    {
        Console::WriteLine(ep->Message);
        Console::WriteLine(ep->StackTrace);
    }
    return 0;
}