POP3 Support and Debugging

The mailman object has two properties that provide detailed information about what transpired during a POP3 session. The mailman.LastErrorText property may be examined after any Chilkat method call to get detailed information about the last method called on the object instance. It is standard across all components. The LastErrorText will contain information even when a method is successful. When requesting support, it is almost always beneficial to send the contents of the LastErrorText because it is designed to tell us (Chilkat) what transpired during the method call. In many cases you may easily be able to identify the cause of a problem by looking at LastErrorText.

The Pop3SessionLog property provides a detailed record of the raw command sent to the POP3 server and the raw responses received back from the POP3 server. This is an additional source of information to help understand any POP3 issues. If the information in LastErrorText is not enough, Chilkat support will often ask for the contents of the Pop3SessionLog property.

Note: Just because a property has "Log" in the name does not mean it is a file. The Pop3SessionLog property is a string that contains the actual text of the log.

Download Chilkat Email ActiveX

'  The mailman object is used for receiving (POP3)
'  and sending (SMTP) email.
Dim mailman As New ChilkatMailMan2

'  Any string argument automatically begins the 30-day trial.
Dim success As Long
success = mailman.UnlockComponent("30-day trial")
If (success <> 1) Then
    MsgBox mailman.LastErrorText
    Exit Sub
End If

'  Set the POP3 server's hostname
mailman.MailHost = "mail.chilkatsoft.com"

'  Set the POP3 login/password.
mailman.PopUsername = "myLogin"
mailman.PopPassword = "myPassword"

Dim bundle As ChilkatEmailBundle2
'  Copy the all email from the user's POP3 mailbox
'  into a bundle object.  The email remains on the server.
Set bundle = mailman.CopyMail()

If (bundle Is Nothing ) Then
    '  The CopyMail failed, examine the LastErrorText
    Text1.Text = Text1.Text & mailman.LastErrorText & vbCrLf
    Exit Sub
End If

If (bundle.MessageCount > 0) Then
    Text1.Text = Text1.Text & "Number of messages: " _
         & bundle.MessageCount & vbCrLf
Else
    '  No messages were received.  If you expected to find messages
    '  you may wish to look at the LastErrorText and the Pop3SessionLog:
    Text1.Text = Text1.Text & mailman.Pop3SessionLog & vbCrLf
    Text1.Text = Text1.Text & mailman.LastErrorText & vbCrLf
End If

mailman.Pop3EndSession