Delete Individual Emails from POP3 Mailbox

Demonstrates how to delete individual emails from a POP3 mailbox.

Downloads for Windows/Linux and Install Instructions

require 'rubygems'
require 'chilkat'

#  The mailman object is used for receiving (POP3)
#  and sending (SMTP) email.
mailman = Chilkat::CkMailMan.new()

#  Any string argument automatically begins the 30-day trial.
success = mailman.UnlockComponent("Anything for 30-day trial")
if (success != true)
    print "Component unlock failed" + "\n"
    exit
end

#  Set the POP3 server's hostname
mailman.put_MailHost("mail.chilkatsoft.com")

#  Set the POP3 login/password.
mailman.put_PopUsername("myLogin")
mailman.put_PopPassword("myPassword")

#  Set the ImmediateDelete property = false
#  When the DeleteEmail method is called, the POP3 session
#  will remain open and the emails will be deleted all at once
#  when the session closes.
mailman.put_ImmediateDelete(false)

#  Download email headers.
# bundle is a CkEmailBundle
bundle = mailman.GetAllHeaders(1)

if (bundle == nil )
    print mailman.lastErrorText() + "\n"
    exit
end

for i in 0 .. bundle.get_MessageCount() - 1
    # email is a CkEmail
    email = bundle.GetEmail(i)

    print email.ck_from() + "\r\n" + "\n";
    print email.subject() + "\r\n" + "\n";

    #  If you decide the email is to be deleted, call DeleteEmail.
    #  This marks the email for deletion on the POP3 server.
    success = mailman.DeleteEmail(email)
    if (success != true)
        print mailman.lastErrorText() + "\n"
        exit
    end

end

#  Make sure the POP3 session is ended to finalize the deletes.
success = mailman.Pop3EndSession()
if (success != true)
    print mailman.lastErrorText() + "\n"
end

print "Success!" + "\n"