Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
Send Identical Email to Distribution List
Sends an identical email to a distribution list. <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' The mailman object is used for sending and receiving email. set mailman = Server.CreateObject("Chilkat.MailMan") ' Any string argument automatically begins the 30-day trial. success = mailman.UnlockComponent("30-day trial") If (success <> 1) Then Response.Write "Component unlock failed" & "<br>" End If ' Set the SMTP server. mailman.SmtpHost = "mail.chilkatsoft.com" mailman.SmtpUsername = "admin@chilkatsoft.com" mailman.SmtpPassword = "****" ' Create a new email object set email = Server.CreateObject("Chilkat.Email") email.Subject = "This is a test" email.Body = "This is a test" email.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.) set sa = Server.CreateObject("Chilkat.CkStringArray") success = sa.LoadFromFile("distributionList.txt") If (success <> 1) Then Response.Write sa.LastErrorText & "<br>" End If ' 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 1, then the email ' is sent individually to each recipient in the list using ' the "To" header field. ' If the SendIndividual property is 0, 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 = 1 mailman.SendIndividual = 1 success = mailman.SendToDistributionList(email,sa) If (success <> 1) Then Response.Write mailman.LastErrorText & "<br>" Else Response.Write "Mail Sent!" & "<br>" End If %> </body> </html> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.