VBScript

Get a To Recipient's Name Only

Demonstrates the Chilkat Email.GetToName method, which returns only the friendly-name part (not the address) of the Nth To recipient. The index is zero-based. This example adds two To recipients and prints each one's display name.

Background: The display name is the human-friendly label attached to an address, like Joe Smith for joe@example.com. It is optional and purely cosmetic but useful for presentation. GetToName returns just that name; if a recipient was added without one, the result is empty, in which case fall back to GetToAddr.

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 GetToName method, which returns only the friendly-name part (not the
'  address) of the Nth To recipient.  The index is zero-based.

set email = CreateObject("Chilkat.Email")
email.Subject = "GetToName example"

success = email.AddTo("Joe Smith","joe@example.com")
success = email.AddTo("Jane Doe","jane@example.com")

n = email.NumTo

For i = 0 To n - 1
    outFile.WriteLine("To " & i & " name: " & email.GetToName(i))
Next

outFile.Close