VBScript

Add Multiple To Recipients at Once

Demonstrates the Chilkat Email.AddMultipleTo method, which parses a comma-separated list of mailbox addresses and appends them all to the direct-recipient (To) list. Each entry may include a display name (e.g. Joe <joe@example.com>). This example adds three To recipients in a single call.

Background: The To header holds a message's primary recipients, and email allows any number of them as a comma-separated list. AddMultipleTo parses that standard syntax — accepting both bare addresses and named forms — so when your recipients arrive as one string (from a form field, database column, or config value) you can populate the whole To list in one step instead of calling AddTo per recipient.

Chilkat VBScript Downloads

Download Chilkat for VBScript

VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

'  Demonstrates the AddMultipleTo method, which parses a comma-separated list of
'  addresses and appends them all to the direct-recipient (To) list.

set email = CreateObject("Chilkat.Email")
email.Subject = "Multiple To example"
email.From = "alice@example.com"

'  Add several To recipients at once.  Each entry may include a display name.
success = email.AddMultipleTo("Joe <joe@example.com>, jane@example.com, Bob <bob@example.com>")

outFile.WriteLine("NumTo = " & email.NumTo)

outFile.Close