(PureBasic) Number of Messages in a POP3 Mailbox
Get the number of messages in a POP3 mailbox.
IncludeFile "CkMailMan.pb"
Procedure ChilkatExample()
; 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.
mailman.i = CkMailMan::ckCreate()
If mailman.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
; Set the POP3 server's hostname
CkMailMan::setCkMailHost(mailman, "pop.someMailServer.com")
; Set the POP3 login/password.
CkMailMan::setCkPopUsername(mailman, "myLogin")
CkMailMan::setCkPopPassword(mailman, "****")
; Get the number of messages in the mailbox.
numMessages.i = CkMailMan::ckGetMailboxCount(mailman)
Debug Str(numMessages)
CkMailMan::ckDispose(mailman)
ProcedureReturn
EndProcedure
|