(MFC) Send Email to Distribution List

Sends the same email to a list of 1000 email addresses in 50 sends where each email has 20 recipients.

Note: Chilkat is not intended nor designed for mass emailing. A solution such as this might be used for a corporate emailing to employees, or an emailing to newsletter subscribers.

Chilkat C/C++ Library Downloads MS Visual C/C++ Libs

See Also: Using MFC CString in Chilkat

#include <CkMailMan.h>
#include <CkEmail.h>
#include <CkBinData.h>
#include <CkStringTable.h>
#include <CkStringBuilder.h>

void ChilkatSample(void)
    {
    CkString strOut;

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    CkMailMan mailman;
    bool success;

    mailman.put_SmtpHost("smtp.mymailserver.com");
    mailman.put_SmtpPort(465);
    mailman.put_SmtpSsl(true);
    mailman.put_SmtpUsername("myUsername");
    mailman.put_SmtpPassword("myPassword");

    // Create a new email object
    CkEmail email;
    email.put_Subject("This is a test");
    email.put_Body("This is a test");
    email.put_From("Senders Name <sender@example.com>");
    email.AddTo("Subscribers","subscribers@example.com");

    CkBinData bdMime;
    mailman.RenderToMimeBd(email,bdMime);

    // Load a file containing one email address per line.
    CkStringTable distList;
    success = distList.AppendFromFile(1000,"utf-8","qa_data/distList.txt");
    if (success == false) {
        strOut.append(distList.lastErrorText());
        strOut.append("\r\n");
        SetDlgItemText(IDC_EDIT1,strOut.getUnicode());
        return;
    }

    CkStringBuilder sbRecipients;

    int i = 0;
    int szDistList = distList.get_Count();
    int j = 0;
    while (i < szDistList) {

        // Build a list of comma-separated recipients.
        if (j > 0) {
            sbRecipients.Append(",");
        }

        sbRecipients.Append(distList.stringAt(i));

        i = i + 1;
        j = j + 1;

        // If we have 20 recipients, or we have the final recipient in the final chunk, then send.
        if ((j == 20) || (i == szDistList)) {
            success = mailman.SendMimeBd("sender@example.com",sbRecipients.getAsString(),bdMime);
            if (success != true) {
                strOut.append(mailman.lastErrorText());
                strOut.append("\r\n");
                SetDlgItemText(IDC_EDIT1,strOut.getUnicode());
                return;
            }

            j = 0;
            sbRecipients.Clear();
        }

    }

    success = mailman.CloseSmtpConnection();
    if (success != true) {
        strOut.append("Connection to SMTP server not closed cleanly.");
        strOut.append("\r\n");
    }

    strOut.append("Email sent to distirbution list.");
    strOut.append("\r\n");


    SetDlgItemText(IDC_EDIT1,strOut.getUnicode());

    }