![]() |
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
(DataFlex) POP3 STARTTLSDemonstrates how to do POP3 STARTTLS. Note: This example requires Chilkat v11.0.0 or greater.
Use ChilkatAx-win32.pkg Procedure Test Boolean iSuccess Handle hoMailman Variant vBundle Handle hoBundle Boolean iKeepOnServer Boolean iHeadersOnly Integer iNumBodyLines Variant vEmail Handle hoEmail Integer i String sTemp1 Move False To iSuccess // 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. Get Create (RefClass(cComChilkatMailMan)) To hoMailman If (Not(IsComObjectCreated(hoMailman))) Begin Send CreateComObject of hoMailman End // Set the POP3 server's hostname Set ComMailHost Of hoMailman To "pop.gmail.com" // Set the POP3 login/password. Set ComPopUsername Of hoMailman To "****@gmail.com" Set ComPopPassword Of hoMailman To "****" // Indicate that we want TLS/SSL. Also, set the port to 995: Set ComMailPort Of hoMailman To 995 Set ComPopSsl Of hoMailman To True Get Create (RefClass(cComChilkatEmailBundle)) To hoBundle If (Not(IsComObjectCreated(hoBundle))) Begin Send CreateComObject of hoBundle End Move True To iKeepOnServer Move False To iHeadersOnly // Irrelevent because we are NOT downloading headers-only Move 0 To iNumBodyLines Get pvComObject of hoBundle to vBundle Get ComFetchAll Of hoMailman iKeepOnServer iHeadersOnly iNumBodyLines vBundle To iSuccess If (iSuccess = False) Begin Get ComLastErrorText Of hoMailman To sTemp1 Showln sTemp1 Procedure_Return End Get Create (RefClass(cComChilkatEmail)) To hoEmail If (Not(IsComObjectCreated(hoEmail))) Begin Send CreateComObject of hoEmail End Move 0 To i While (i < (ComMessageCount(hoBundle))) Get pvComObject of hoEmail to vEmail Get ComEmailAt Of hoBundle i vEmail To iSuccess // Display the From email address and the subject. Get ComFrom Of hoEmail To sTemp1 Showln "From: " sTemp1 Get ComSubject Of hoEmail To sTemp1 Showln "Subject: " sTemp1 Move (i + 1) To i Loop End_Procedure |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.