VBScript

Clear an Email Object

Demonstrates the Chilkat Email.Clear method, which removes the current message content — recipients, headers, body representations, attachments, related items, and embedded messages — leaving an empty email object. This example builds a message with a recipient and attachment, clears it, and prints the counts before and after.

Background: Reusing a single Email object across many operations is efficient, but leftover state from a previous message could leak into the next. Clear resets the object completely, giving you a clean slate — the safe way to start a fresh message without allocating a new object.

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 Clear method, which removes the current message content, including
'  recipients, headers, body representations, attachments, related items, and embedded
'  messages -- leaving an empty email object.

set email = CreateObject("Chilkat.Email")
email.Subject = "A message"
email.Body = "Some body text."
success = email.AddTo("Bob","bob@example.com")
success = email.AddStringAttachment("notes.txt","Some notes.")

outFile.WriteLine("NumTo before clear = " & email.NumTo)
outFile.WriteLine("NumAttachments before clear = " & email.NumAttachments)

'  Remove all content, resetting the email object.
email.Clear 

outFile.WriteLine("NumTo after clear = " & email.NumTo)
outFile.WriteLine("NumAttachments after clear = " & email.NumAttachments)

outFile.Close