(Go) Delete All IMAP Email

Demonstrates two ways to delete all email in a mailbox on an IMAP server.

Chilkat Go Downloads Go Package for Windows, MacOS, Linux, Alpine Linux, Solaris

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    imap := chilkat.NewImap()

    // Turn on session logging:
    imap.SetKeepSessionLog(true)

    // Connect to an IMAP server.
    // Use TLS
    imap.SetSsl(true)
    imap.SetPort(993)
    success := imap.Connect("imap.someMailServer.com")
    if success != true {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    // Login
    success = imap.Login("myLogin","myPassword")
    if success != true {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    // Select an IMAP mailbox
    success = imap.SelectMailbox("Inbox.RubyMail")
    if success != true {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    // messageSet is a MessageSet

    // Get the complete set of Uids for email in the selected mailbox.
    messageSet := imap.GetAllUids()
    if imap.LastMethodSuccess() != true {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    // Set the Deleted flag for each message.
    // (ExpungeAndClose must be called to finalize the delete.)
    success = imap.SetFlags(messageSet,"Deleted",1)
    if success != true {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    // Alternatively, the Deleted flag may be set for each UID
    // individiually, but this is less efficient:
    var i int
    n := messageSet.Count()
    for i = 0; i <= n - 1; i++ {
        success = imap.SetFlag(*messageSet.GetId(i),messageSet.HasUids(),"Deleted",1)
        if success != true {
            fmt.Println(imap.LastErrorText())
            imap.DisposeImap()
            return
        }

    }

    // Expunge and close the mailbox.
    success = imap.ExpungeAndClose()
    if success != true {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    // Display the session log.
    fmt.Println(imap.SessionLog())

    // Disconnect from the IMAP server.
    success = imap.Disconnect()

    messageSet.DisposeMessageSet()

    imap.DisposeImap()