Sample code for 30+ languages & platforms
DataFlex

Get the POP3 Mailbox Message Count

See more POP3 Examples

Demonstrates the Chilkat MailMan.GetMailboxCount method, which returns the number of emails currently available in the POP3 mailbox, or -1 if an error occurs. It is functionally identical to CheckMail. This example configures the POP3 connection and reads the count.

Background: The message count is the number of messages sitting in the POP3 maildrop — the server-side spool that holds mail until a client downloads (and typically deletes) it. Because POP3's traditional model moves mail off the server, this count is essentially the size of the "inbox to be picked up." Chilkat auto-connects using the configured MailHost, credentials, and SSL settings if no session is open.

Chilkat DataFlex Downloads

DataFlex
Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoMailman
    Integer iCount

    //  Demonstrates the MailMan.GetMailboxCount method, which returns the number of emails
    //  currently available in the POP3 mailbox (or -1 if an error occurs).  It is functionally
    //  identical to CheckMail.

    Get Create (RefClass(cComChilkatMailMan)) To hoMailman
    If (Not(IsComObjectCreated(hoMailman))) Begin
        Send CreateComObject of hoMailman
    End

    //  Configure the POP3 server connection.
    Set ComMailHost Of hoMailman To "pop.example.com"
    Set ComMailPort Of hoMailman To 995
    Set ComPopSsl Of hoMailman To True
    Set ComPopUsername Of hoMailman To "user@example.com"
    Set ComPopPassword Of hoMailman To "myPassword"

    Get ComGetMailboxCount Of hoMailman To iCount
    Showln "Mailbox message count: " iCount

    //  Note: Explicitly connecting/authenticating is optional.  Chilkat MailMan automatically
    //  connects and authenticates -- using the property settings above -- whenever a server
    //  operation requires it.  Calling the explicit connect/authenticate methods can still be
    //  helpful to determine whether a failure occurs while connecting or while authenticating.


End_Procedure