Send Identical Email to Distribution List

Sends an identical email to a distribution list.

Download Chilkat Ruby Library

require 'chilkat'

#  The mailman object is used for sending and receiving email.
mailman = Chilkat::CkMailMan.new()

#  Any string argument automatically begins the 30-day trial.
success = mailman.UnlockComponent("30-day trial")
if (success != true)
    print "Component unlock failed" + "\n"
    exit
end

#  Set the SMTP server.
mailman.put_SmtpHost("mail.chilkatsoft.com")
mailman.put_SmtpUsername("admin@chilkatsoft.com")
mailman.put_SmtpPassword("****")

#  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("Chilkat Support <support@chilkatsoft.com>")

#  Load a text file containing email addresses, one per line,
#  into a StringArray object. (In some programming languages,
#  this is a CkStringArray.)
sa = Chilkat::CkStringArray.new()
success = sa.LoadFromFile("distributionList.txt")
if (success != true)
    print "Failed to load distributionList.txt" + "\n"
    exit
end

#  Note: the distributionList.txt file contains one email
#  address per line.  For example:
# 
#  matt@chilkatsoft.com
#  "Chilkat Admin" <admin@chilkatsoft.com>
#  <support@chilkatsoft.com>
# 
#  An email address may contain both the friendly name (in quote)
#  and the email address (in angled brackets).  The friendly
#  name is optional.  When the friendly name is missing,
#  angled brackets are optional.

#  If the SendIndividual property is true, then the email
#  is sent individually to each recipient in the list using
#  the "To" header field.

#  If the SendIndividual property is false, then emails
#  are sent in batches of 100 BCC's.  Your program should
#  provide a single "To" address, such as:
email.AddTo("My List","listAdmin@chilkatsoft.com")

#  This example will send emails individually, so we'll clear
#  the "To" list.
email.ClearTo()

#  Set the mailman's SendIndividual property = true
mailman.put_SendIndividual(true)

success = mailman.SendToDistributionList(email,sa)
if (success != true)
    print mailman.lastErrorText() + "\n"
else
    print "Mail Sent!" + "\n"
end