![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PureBasic) Download POP3 Email using UIDLsDemonstrates how to download POP3 email by first getting the complete set of UIDLs and then downloading email by calling FetchByUIDL for each UIDL. Note: This example requires Chilkat v11.0.0 or greater.
IncludeFile "CkStringTable.pb" IncludeFile "CkEmail.pb" IncludeFile "CkMailMan.pb" Procedure ChilkatExample() success.i = 0 ; This example requires the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. ; The mailman object is used for receiving (POP3) ; and sending (SMTP) email. mailman.i = CkMailMan::ckCreate() If mailman.i = 0 Debug "Failed to create object." ProcedureReturn EndIf ; Set the POP3 server's hostname CkMailMan::setCkMailHost(mailman, "pop.example.com") ; Set the POP3 login/password. CkMailMan::setCkPopUsername(mailman, "myLogin") CkMailMan::setCkPopPassword(mailman, "myPassword") stUidls.i = CkStringTable::ckCreate() If stUidls.i = 0 Debug "Failed to create object." ProcedureReturn EndIf success = CkMailMan::ckFetchUidls(mailman,stUidls) If success = 0 Debug CkMailMan::ckLastErrorText(mailman) CkMailMan::ckDispose(mailman) CkStringTable::ckDispose(stUidls) ProcedureReturn EndIf email.i = CkEmail::ckCreate() If email.i = 0 Debug "Failed to create object." ProcedureReturn EndIf count.i = CkStringTable::ckCount(stUidls) i.i = 0 While i < count ; Download the full email. success = CkMailMan::ckFetchByUidl(mailman,CkStringTable::ckStringAt(stUidls,i),0,0,email) If success = 0 Debug CkMailMan::ckLastErrorText(mailman) CkMailMan::ckDispose(mailman) CkStringTable::ckDispose(stUidls) CkEmail::ckDispose(email) ProcedureReturn EndIf Debug Str(i) Debug "From: " + CkEmail::ckFrom(email) Debug "Subject: " + CkEmail::ckSubject(email) i = i + 1 Wend CkMailMan::ckPop3EndSession(mailman) CkMailMan::ckDispose(mailman) CkStringTable::ckDispose(stUidls) CkEmail::ckDispose(email) ProcedureReturn EndProcedure |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.