AutoIt

POP3 Fetch Mime Source of Email by UIDL

Demonstrates how to fetch the MIME source of a single email by UIDL. AutoIt

Local $bSuccess = False

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

$oMailman = ObjCreate("Chilkat.MailMan")

$oMailman.MailHost = "pop.example.com"

$oMailman.PopUsername = "myLogin"
$oMailman.PopPassword = "myPassword"

$oMailman.MailPort = 995
$oMailman.PopSsl = True

$oStUidls = ObjCreate("Chilkat.StringTable")
$bSuccess = $oMailman.FetchUidls($oStUidls)
If ($bSuccess = False) Then
    ConsoleWrite($oMailman.LastErrorText & @CRLF)
    Exit
EndIf

; Download each email as MIME.
$oBdMime = ObjCreate("Chilkat.BinData")

Local $iCount = $oStUidls.Count
Local $i = 0
While $i < $iCount
    $bSuccess = $oMailman.FetchMimeBd($oStUidls.StringAt($i),$oBdMime)
    If ($bSuccess = False) Then
        ConsoleWrite($oMailman.LastErrorText & @CRLF)
        Exit
    EndIf

    ; Do whatever is needed with the MIME contained in bdMime.

    $i = $i + 1
Wend