public bool SendJobs()

Public Function SendJobs As Boolean

using System;
using System.Data;
using System.Data.OleDb;
using MailBee;
using MailBee.Mime;
using MailBee.SmtpMail;

class Sample
{
    // Reports successful attempt of sending mail merge e-mail.
    static void mailer_MessageSent(object sender, SmtpMessageSentEventArgs e)
    {
        // Ignore notification e-mail (it's not mail merge).
        if (e.MergeTable != null)
        {
            // Display e-mail address of the successful e-mail.
            Console.WriteLine(e.MergeTable.Rows[e.MergeRowIndex]["Email"] + " SUCCEEDED");
        }
    }

    // Reports failed attempt of sending mail merge e-mail.
    static void mailer_MessageNotSent(object sender, SmtpMessageNotSentEventArgs e)
    {
        // Ignore notification e-mail (it's not mail merge).
        if (e.MergeTable != null)
        {
            // Display e-mail address of the failed e-mail.
            Console.WriteLine(e.MergeTable.Rows[e.MergeRowIndex]["Email"] + " FAILED");
        }
    }

    static void Main(string[] args)
    {
        Smtp mailer = new Smtp();

        // Logging into a file is useful for troubleshooting.
        mailer.Log.Filename = @"C:\Temp\log.txt";
        mailer.Log.Enabled = true;
        mailer.Log.Format = LogFormatOptions.AddContextInfo;
        mailer.Log.Clear();

        // Uncomment the line below to use unlimited number of worker threads (up to 60)
        // and increase performance. Note that not all SMTP servers support this.

        // mailer.MaxThreadCount = -1;

        // Subscribe to events to track send bulk mail progress.
        mailer.MessageSent += new SmtpMessageSentEventHandler(mailer_MessageSent);
        mailer.MessageNotSent += new SmtpMessageNotSentEventHandler(mailer_MessageNotSent);

        // Setup SMTP server parameters.
        mailer.SmtpServers.Add("mail.domain.com", "jdoe", "secret");

        // Setup e-mail message header template for mail merge.
        mailer.Message.From.AsString = "John Doe <john.doe@domain.com>";
        mailer.Message.To.AsString = "##Email##";
        mailer.Message.Subject = "Our Jan/2007 newsletter";

        // Setup plain-text body template.
        mailer.Message.BodyPlainText = "##Body##";

        // Specify database connection string (it may be different in your case).
        string connParams = @"Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Temp\newsletter.mdb;";

        // Connect to the database and populate mail merge job to-do list with
        // the data from "mailing_list" table.
        using (OleDbConnection conn = new OleDbConnection(connParams))
        {
            // Open the connection and get the data.
            OleDbCommand command = new OleDbCommand("SELECT * FROM mailing_list", conn);
            conn.Open();
            OleDbDataAdapter adapter = new OleDbDataAdapter();
            DataTable table = new DataTable();
            adapter.SelectCommand = command;
            adapter.Fill(table);

            // Create a job which is the following task for MailBee: perform mail merge over
            // the specified data table and then send out each resulting e-mail to
            // the recipients which appear in the resulting messages. "bounce@domain.com"
            // address will be used as Return-Path (i.e. sender e-mail address).
            mailer.AddJob("1", "bounce@domain.com", null, table);
        }

        // Create a job which is a task of sending a notification e-mail to the originator
        // of the newsletter regarding completion of bulk mailing.
        mailer.Message.To.AsString = "John Doe <john.doe@domain.com>";
        mailer.Message.Subject = "Status: Our Jan/2007 newsletter";
        mailer.Message.BodyPlainText = "Newsletter sent out";
        mailer.AddJob("2", null, null);

        // In case of timeouts, uncomment the next line. ESMTP CHUNKING sometimes causes problems (usually, with MS Exchange).
        // mailer.SmtpServers[0].SmtpOptions = ExtendedSmtpOptions.NoChunking;

        // Run both jobs. The actual mail merge (job #1) and
        // sending a single e-mail (job #2) takes place here.
        mailer.SendJobs();
        Console.WriteLine();

        // Report results to the console.
        if (mailer.JobsFailed.Count == 0)
        {
            Console.WriteLine("All e-mails have been sent.");
        }
        else
        {
            if (mailer.JobsSuccessful.Count == 0)
            {
                Console.WriteLine("No e-mails have been sent.");
            }
            else
            {
                Console.WriteLine("Some e-mails have not been sent.");
                Console.WriteLine();

                // Report mail merge results (job #1).
                Console.WriteLine("Successful mail merge data rows: ");
                Console.WriteLine(mailer.JobsSuccessful.GetIndicesAsString(null, "1"));
                Console.WriteLine();
                Console.WriteLine("Failed mail merge data rows: ");
                Console.WriteLine(mailer.JobsFailed.GetIndicesAsString(null, "1"));
                Console.WriteLine();

                // Report notification e-mail results (job #2).
                if (mailer.JobsFailed.GetIndicesAsString(null, "2") == string.Empty)
                {
                    Console.WriteLine("Notification e-mail has been sent.");
                }
                else
                {
                    Console.WriteLine("Notification e-mail has not been sent.");
                }
            }
        }
    }
}

Imports System
Imports System.Data
Imports System.Data.OleDb
Imports MailBee
Imports MailBee.Mime
Imports MailBee.SmtpMail

Class Sample
    ' Reports successful attempt of sending mail merge e-mail.
    Shared Sub mailer_MessageSent(ByVal sender As Object, ByVal e As SmtpMessageSentEventArgs)
        ' Ignore notification e-mail (it's not mail merge).
        If Not e.MergeTable Is Nothing Then
            ' Display e-mail address of the successful e-mail.
            Console.WriteLine(e.MergeTable.Rows(e.MergeRowIndex)("Email") & " SUCCEEDED")
        End If
    End Sub

    ' Reports failed attempt of sending mail merge e-mail.
    Shared Sub mailer_MessageNotSent(ByVal sender As Object, ByVal e As SmtpMessageNotSentEventArgs)
        ' Ignore notification e-mail (it's not mail merge).
        If Not e.MergeTable Is Nothing Then
            ' Display e-mail address of the failed e-mail.
            Console.WriteLine(e.MergeTable.Rows(e.MergeRowIndex)("Email") & " FAILED")
        End If
    End Sub

    Shared Sub Main(ByVal args() As String)
        Dim mailer As Smtp = New Smtp

        ' Logging into a file is useful for troubleshooting.
        mailer.Log.Filename = "C:\Temp\log.txt"
        mailer.Log.Enabled = True
        mailer.Log.Format = LogFormatOptions.AddContextInfo
        mailer.Log.Clear()

        ' Uncomment the line below to use unlimited number of worker threads (up to 60)
        ' and increase performance. Note that not all SMTP servers support this.

        ' mailer.MaxThreadCount = -1;

        ' Subscribe to events to track send bulk mail progress.
        AddHandler mailer.MessageSent, AddressOf mailer_MessageSent
        AddHandler mailer.MessageNotSent, AddressOf mailer_MessageNotSent

        ' Setup SMTP server parameters.
        mailer.SmtpServers.Add("mail.domain.com", "jdoe", "secret")

        ' Setup e-mail message header template for mail merge.
        mailer.Message.From.AsString = "John Doe <john.doe@domain.com>"
        mailer.Message.To.AsString = "##Email##"
        mailer.Message.Subject = "Our Jan/2007 newsletter"

        ' Setup plain-text body template.
        mailer.Message.BodyPlainText = "##Body##"

        ' Specify database connection string (it may be different in your case).
        Dim connParams As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Temp\newsletter.mdb;"

        ' Connect to the database and populate mail merge job to-do list with
        ' the data from "mailing_list" table.
        Dim conn As OleDbConnection
        Try
            conn = New OleDbConnection(connParams)

            ' Open the connection and get the data.
            Dim command As OleDbCommand = New OleDbCommand("SELECT * FROM mailing_list", conn)
            conn.Open()
            Dim adapter As OleDbDataAdapter = New OleDbDataAdapter
            Dim table As DataTable = New DataTable
            adapter.SelectCommand = command
            adapter.Fill(table)

            ' Create a job which is the following task for MailBee: perform mail merge over
            ' the specified data table and then send out each resulting e-mail to
            ' the recipients which appear in the resulting messages. "bounce@domain.com"
            ' address will be used as Return-Path (i.e. sender e-mail address).
            mailer.AddJob("1", "bounce@domain.com", Nothing, table)
        Finally
            If Not conn Is Nothing Then
                conn.Close()
            End If
        End Try

        ' Create a job which is a task of sending a notification e-mail to the originator
        ' of the newsletter regarding completion of bulk mailing.
        mailer.Message.To.AsString = "John Doe <john.doe@domain.com>"
        mailer.Message.Subject = "Status: Our Jan/2007 newsletter"
        mailer.Message.BodyPlainText = "Newsletter sent out"
        mailer.AddJob("2", Nothing, Nothing)

        ' In case of timeouts, uncomment the next line. ESMTP CHUNKING sometimes causes problems (usually, with MS Exchange).
        ' mailer.SmtpServers(0).SmtpOptions = ExtendedSmtpOptions.NoChunking

        ' Run both jobs. The actual mail merge (job #1) and
        ' sending a single e-mail (job #2) takes place here.
        mailer.SendJobs()
        Console.WriteLine()

        ' Report results to the console.
        If mailer.JobsFailed.Count = 0 Then
            Console.WriteLine("All e-mails have been sent.")
        Else
            If mailer.JobsSuccessful.Count = 0 Then
                Console.WriteLine("No e-mails have been sent.")
            Else
                Console.WriteLine("Some e-mails have not been sent.")
                Console.WriteLine()

                ' Report mail merge results (job #1).
                Console.WriteLine("Successful mail merge data rows: ")
                Console.WriteLine(mailer.JobsSuccessful.GetIndicesAsString(Nothing, "1"))
                Console.WriteLine()
                Console.WriteLine("Failed mail merge data rows: ")
                Console.WriteLine(mailer.JobsFailed.GetIndicesAsString(Nothing, "1"))
                Console.WriteLine()

                ' Report notification e-mail results (job #2).
                If mailer.JobsFailed.GetIndicesAsString(Nothing, "2") = String.Empty Then
                    Console.WriteLine("Notification e-mail has been sent.")
                Else
                    Console.WriteLine("Notification e-mail has not been sent.")
                End If
            End If
        End If
    End Sub
End Class