(Visual Basic 6.0) Read a POP3 Mailbox
Read a POP3 mailbox and display the FROM and SUBJECT header fields of each email.
' This example assumes 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.someMailServer.com"
' Set the POP3 login/password.
mailman.PopUsername = "myLogin"
mailman.PopPassword = "myPassword"
' Copy the all email from the user's POP3 mailbox
' into a bundle object. The email remains on the server.
Dim bundle As ChilkatEmailBundle
Set bundle = mailman.CopyMail()
If (mailman.LastMethodSuccess = 0) Then
Debug.Print mailman.LastErrorText
Exit Sub
End If
Dim i As Long
i = 0
Dim email As ChilkatEmail
Do While i < bundle.MessageCount
Set email = bundle.GetEmail(i)
Debug.Print "From: " & email.From
Debug.Print "Subject: " & email.Subject
i = i + 1
Loop
Dim success As Long
success = mailman.Pop3EndSession()
|