AutoIt

Convert a MIME Entity to multipart/alternative

Demonstrates the Chilkat Mime.ConvertToMultipartAlt method, which wraps the current entity in a new outer multipart/alternative, making the original the first child. It takes no arguments.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: Use this to add an alternate rendering to an existing message — for example, promoting a plain-text message so an HTML version can be added alongside it. The original content becomes the first (least-preferred) alternative, and you append the richer representation after it. As with the mixed conversion, message-level headers move to the new outer entity.

Chilkat AutoIt Downloads

Download Chilkat for AutoIt

AutoIt

Local $bSuccess = False

$oMime = ObjCreate("Chilkat.Mime")
$bSuccess = $oMime.LoadMimeFile("qa_data/message.eml")
If ($bSuccess = False) Then
    ConsoleWrite($oMime.LastErrorText & @CRLF)
    Exit
EndIf

;  Wrap the current entity in a new outer multipart/alternative entity.  The original entity
;  becomes the first child, ready for an alternate representation to be added.
$bSuccess = $oMime.ConvertToMultipartAlt()
If ($bSuccess = False) Then
    ConsoleWrite($oMime.LastErrorText & @CRLF)
    Exit
EndIf

;  Add an alternative representation of the same content.
$oHtmlPart = ObjCreate("Chilkat.Mime")
$bSuccess = $oHtmlPart.SetBodyFromHtml("<html><body>HTML alternative.</body></html>")
If ($bSuccess = False) Then
    ConsoleWrite($oHtmlPart.LastErrorText & @CRLF)
    Exit
EndIf

$bSuccess = $oMime.AppendPart($oHtmlPart)
If ($bSuccess = False) Then
    ConsoleWrite($oMime.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Number of parts: " & $oMime.NumParts & @CRLF)