VBScript

MIME SetBody

See more MIME Examples

Set the body text of a MIME message via the SetBody method. 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)

success = 0

' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set mime = CreateObject("Chilkat.Mime")

' Add a few header fields:
success = mime.AddHeaderField("Content-Type","text/plain")
success = mime.AddHeaderField("Subject","this is a test")

' Set the body text content via SetBody.
' (Other methods such as SetBodyFromPlainText, or SetBodyFromFile
' will also automatically set the Content-Type header based
' on the type of content.  The SetBody method does not
' alter the MIME header.)
mime.SetBody "This is the body text..."

outFile.WriteLine(mime.GetMime())

' The MIME should look like this:

' Content-Type: text/plain
' Subject: this is a test
' 
' This is the body text...

outFile.Close