Go

Delete Individual Emails from POP3 Mailbox

Demonstrates how to delete individual emails from a POP3 mailbox. Go

    success := false

    // 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 := chilkat.NewMailMan()

    // Set the POP3 server's hostname
    mailman.SetMailHost("pop.example.com")

    // Set the POP3 login/password.
    mailman.SetPopUsername("myLogin")
    mailman.SetPopPassword("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.SetImmediateDelete(false)

    // Download email headers.  
    bundle := chilkat.NewEmailBundle()
    keepOnServer := true
    headersOnly := true
    numBodyLines := 1
    success = mailman.FetchAll(keepOnServer,headersOnly,numBodyLines,bundle)
    if success == false {
        fmt.Println(mailman.LastErrorText())
        mailman.DisposeMailMan()
        bundle.DisposeEmailBundle()
        return
    }

    email := chilkat.NewEmail()
    i := 0
    for i < bundle.MessageCount() {
        bundle.EmailAt(i,email)

        fmt.Println("From: ", email.From())
        fmt.Println("Subject: ", email.Subject())

        // 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 == false {
            fmt.Println(mailman.LastErrorText())
            mailman.DisposeMailMan()
            bundle.DisposeEmailBundle()
            email.DisposeEmail()
            return
        }

        i = i + 1
    }

    // Make sure the POP3 session is ended to finalize the deletes.
    success = mailman.Pop3EndSession()
    if success == false {
        fmt.Println(mailman.LastErrorText())
        mailman.DisposeMailMan()
        bundle.DisposeEmailBundle()
        email.DisposeEmail()
        return
    }

    fmt.Println("Success!")

    mailman.DisposeMailMan()
    bundle.DisposeEmailBundle()
    email.DisposeEmail()