Visual Basic 6.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". Visual Basic 6.0

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 GMail account POP3 properties.
mailman.MailHost = "pop.gmail.com"
mailman.PopUsername = "myLogin"
mailman.PopPassword = "myPassword"
mailman.PopSsl = 1
mailman.MailPort = 995

' Read mail headers and one line of the body.
' To get the full emails, set headersOnly = 0
Dim bundle As New ChilkatEmailBundle
Dim keepOnServer As Long
keepOnServer = 1
Dim headersOnly As Long
headersOnly = 1
Dim numBodyLines As Long
numBodyLines = 1
success = mailman.FetchAll(keepOnServer,headersOnly,numBodyLines,bundle)
If (success = 0) Then
    Debug.Print mailman.LastErrorText
    Exit Sub
End If

Dim i As Long
i = 0
Dim email As New ChilkatEmail
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