![]() |
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
(Visual Basic 6.0) POP3 SSL - Read POP3 Email over TLS/SSL on Port 995Demonstrates how to connect via TLS/SSL to a POP3 server and read email. This assumes that the POP3 server supports SSL. Note: This example requires Chilkat v11.0.0 or greater.
Dim success As Long success = 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. Dim mailman As New ChilkatMailMan ' Set the POP3 server's hostname mailman.MailHost = "pop.gmail.com" ' Set the POP3 login/password. mailman.PopUsername = "****@gmail.com" mailman.PopPassword = "****" ' Indicate that we want TLS/SSL. Also, set the port to 995: mailman.MailPort = 995 mailman.PopSsl = 1 Dim bundle As New ChilkatEmailBundle Dim keepOnServer As Long keepOnServer = 1 Dim headersOnly As Long headersOnly = 0 ' Irrelevent because we are NOT downloading headers-only Dim numBodyLines As Long numBodyLines = 0 success = mailman.FetchAll(keepOnServer,headersOnly,numBodyLines,bundle) If (success = 0) Then Debug.Print mailman.LastErrorText Exit Sub End If Dim email As New ChilkatEmail Dim i As Long i = 0 Do While i < bundle.MessageCount success = bundle.EmailAt(i,email) ' Display the From email address and the subject. Debug.Print "From: " & email.From Debug.Print "Subject: " & email.Subject i = i + 1 Loop |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.