(Swift 2) 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 Downloads for the Swift Programming Language MAC OS X (Cocoa) Objective-C/Swift Libs iOS Objective-C/Swift Libs

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

    let mailman = CkoMailMan()
    var success: Bool

    mailman.SmtpHost = "smtp.mymailserver.com"
    mailman.SmtpPort = 465
    mailman.SmtpSsl = true
    mailman.SmtpUsername = "myUsername"
    mailman.SmtpPassword = "myPassword"

    // Create a new email object
    let email = CkoEmail()
    email.Subject = "This is a test"
    email.Body = "This is a test"
    email.From = "Senders Name <sender@example.com>"
    email.AddTo("Subscribers", emailAddress: "subscribers@example.com")

    let bdMime = CkoBinData()
    mailman.RenderToMimeBd(email, renderedMime: bdMime)

    // Load a file containing one email address per line.
    let distList = CkoStringTable()
    success = distList.AppendFromFile(1000, charset: "utf-8", path: "qa_data/distList.txt")
    if success == false {
        print("\(distList.LastErrorText)")
        return
    }

    let sbRecipients = CkoStringBuilder()

    var i: Int = 0
    var szDistList: Int = distList.Count.intValue
    var j: Int = 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", recipients: sbRecipients.GetAsString(), mimeData: bdMime)
            if success != true {
                print("\(mailman.LastErrorText)")
                return
            }

            j = 0
            sbRecipients.Clear()
        }

    }

    success = mailman.CloseSmtpConnection()
    if success != true {
        print("Connection to SMTP server not closed cleanly.")
    }

    print("Email sent to distirbution list.")

}