(AutoIt) Parsing a Multipart/Digest Email

This example demonstrates how to parse a multipart/digest email. An email parsed by this sample could have a MIME structure as follows:

multipart/mixed
    text/plain
    text/plain
    multipart/digest
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
        message/rfc822
    text/plain

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

; Note: This example requires Chilkat v9.5.0.66 or greater.

Local $sEmlPath = "qa_data/eml/multipart_digest.eml"

$oEmail = ObjCreate("Chilkat.Email")

; For this example, we'll load the email from a .eml.
; The email could alternatively be loaded as a result of downloading from an IMAP or POP3 server..

Local $bSuccess = $oEmail.LoadEml($sEmlPath)
If ($bSuccess <> True) Then
    ConsoleWrite($oEmail.LastErrorText & @CRLF)
    Exit
EndIf

Local $iNumDigests = $oEmail.NumDigests
ConsoleWrite("num digests = " & $iNumDigests & @CRLF)

Local $i = 0
While $i < $iNumDigests
Local $oEDigest = $oEmail.GetDigest($i)
    ConsoleWrite($i & ":" & $oEDigest.FromAddress & ", " & $oEDigest.Subject & @CRLF)
Local $sM = $oEDigest.GetHeaderField("Message")
    If ($oEDigest.LastMethodSuccess = True) Then
        ConsoleWrite("    Message = " & $sM & @CRLF)
    EndIf

    $i = $i + 1
Wend