Ruby

Send Email to Distribution List

See more SMTP Examples

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.

Ruby

require 'chilkat'

success = false

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

mailman = Chilkat::CkMailMan.new()

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
email = Chilkat::CkEmail.new()
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")

bdMime = Chilkat::CkBinData.new()
mailman.RenderToMimeBd(email,bdMime)

# Load a file containing one email address per line.
distList = Chilkat::CkStringTable.new()
success = distList.AppendFromFile(1000,"utf-8","qa_data/distList.txt")
if (success == false)
    print distList.lastErrorText() + "\n";
    exit
end

sbRecipients = Chilkat::CkStringBuilder.new()

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

    # Build a list of comma-separated recipients.
    if (j > 0)
        sbRecipients.Append(",")
    end

    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) or (i == szDistList))
        success = mailman.SendMimeBd("sender@example.com",sbRecipients.getAsString(),bdMime)
        if (success != true)
            print mailman.lastErrorText() + "\n";
            exit
        end

        j = 0
        sbRecipients.Clear()
    end

end

success = mailman.CloseSmtpConnection()
if (success != true)
    print "Connection to SMTP server not closed cleanly." + "\n";
end

print "Email sent to distirbution list." + "\n";