(AutoIt) POP3 Fetch Mime Source of Email by UIDL
Demonstrates how to fetch the MIME source of a single email by UIDL. Note: This example requires Chilkat v11.0.0 or greater.
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
|