B4X Requires Chilkat v11.0.0+

Read Gmail POP3 Mailbox

Reads the header for each email in a GMail POP3 mailbox and displays the FROM and SUBJECT header fields. In your GMail "Forwarding and POP" settings, be sure to select "When messages are accessed with POP keep Gmail's copy in the Inbox". B4X

Dim success As Boolean = False

'  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 ChilkatMailMan
mailman.Initialize("mailman")

'  Set the GMail account POP3 properties.
mailman.MailHost = "pop.gmail.com"
mailman.PopUsername = "myLogin"
mailman.PopPassword = "myPassword"
mailman.PopSsl = True
mailman.MailPort = 995

'  Read mail headers and one line of the body.
'  To get the full emails, set headersOnly = False
Dim bundle As ChilkatEmailBundle
bundle.Initialize
Dim keepOnServer As Boolean = True
Dim headersOnly As Boolean = True
Dim numBodyLines As Int = 1
success = mailman.FetchAll(keepOnServer, headersOnly, numBodyLines, bundle)
If success = False Then
    Log(mailman.LastErrorText)
    Return
End If


Dim i As Int = 0
Dim email As ChilkatEmail
email.Initialize
Do While i < bundle.MessageCount
    bundle.EmailAt(i, email)

    '  Display the From email address and the subject.
    Log("From: " & email.From)
    Log("Subject: " & email.Subject)

    i = i + 1
Loop