(VBScript) Example: MailMan.RenderToMime method

Demonstrates the RenderToMime method.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

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

' Create a simple email
set email = CreateObject("Chilkat.Email")

email.Subject = "This is a test"
email.Body = "This is a test"

email.From = "Joe <joe@example.com>"
success = email.AddTo("Mary","mary@example2.com")

set mailman = CreateObject("Chilkat.MailMan")

' See the exact MIME of the email that would be sent
' if your application called SendEmail and passed in the email object.
renderedMime = mailman.RenderToMime(email)

outFile.WriteLine(renderedMime)

' For this example, the rendered MIME looks like this:

' MIME-Version: 1.0
' Date: Fri, 27 Feb 2026 06:55:44 -0600
' Message-ID: <E4369AE94DE6CD7D08D4F15D95937F2A7FFC95E8@CHILKAT25>
' Content-Type: text/plain; charset=us-ascii; format=flowed
' Content-Transfer-Encoding: 7bit
' X-Priority: 3 (Normal)
' Subject: This is a test
' From: Joe <joe@example.com>
' To: Mary <mary@example2.com>
' 
' This is a test

outFile.Close