(Xojo Plugin) POP3 STARTTLS
Demonstrates how to do POP3 STARTTLS.
// 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 Chilkat.MailMan
// 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 = True
Dim bundle As Chilkat.EmailBundle
bundle = mailman.CopyMail()
If (mailman.LastMethodSuccess = False) Then
System.DebugLog(mailman.LastErrorText)
Return
End If
Dim i As Int32
i = 0
Dim email As Chilkat.Email
While i < bundle.MessageCount
email = bundle.GetEmail(i)
// Display the From email address and the subject.
System.DebugLog("From: " + email.From)
System.DebugLog("Subject: " + email.Subject)
i = i + 1
Wend
|