(AutoIt) Create multipart/alternative MIME

Demonstrates how to create a multipart/alternative MIME structure using the NewMultipartAlternative method.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

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

Local $bSuccess

; Start with an empty MIME object...
$oMime = ObjCreate("Chilkat.Mime")

; Initialize it as multipart/alternative.
$oMime.NewMultipartAlternative()

; Create a text/plain part.
$oPtMime = ObjCreate("Chilkat.Mime")
$oPtMime.SetBodyFromPlainText("This is the plain text body.")
ConsoleWrite($oPtMime.GetMime() & @CRLF)
ConsoleWrite("****" & @CRLF)

; The text/plain part looks like this:

; 	Content-Type: text/plain
; 	Content-Transfer-Encoding: 7bit
; 
; 	This is the plain text body.

; Create a text/HTML part.
$oHtmlMime = ObjCreate("Chilkat.Mime")
$oHtmlMime.SetBodyFromHtml("<html><body><p>This is the <b>HTML body</b></p></body></html>")
ConsoleWrite($oHtmlMime.GetMime() & @CRLF)
ConsoleWrite("****" & @CRLF)

; The text/html part looks like this:

; 	Content-Type: text/html
; 	Content-Transfer-Encoding: 7bit
; 
; 	<html><body><p>This is the <b>HTML body</b></p></body></html>

; Add both parts as children of the multipart/alternative
$oMime.AppendPart($oPtMime)
$oMime.AppendPart($oHtmlMime)
ConsoleWrite($oMime.GetMime() & @CRLF)

; This the result.  The boundary string was automatically generaetd.

; 	Content-Type: multipart/alternative; boundary="------------080803090906030708030908"
; 
; 	--------------080803090906030708030908
; 	Content-Type: text/plain
; 	Content-Transfer-Encoding: 7bit
; 
; 	This is the plain text body.
; 	--------------080803090906030708030908
; 	Content-Type: text/html
; 	Content-Transfer-Encoding: 7bit
; 
; 	<html><body><p>This is the <b>HTML body</b></p></body></html>
; 	--------------080803090906030708030908--