Lua

Upload (Append) Email to an IMAP Mailbox and get the UID of the Appended Email

Upload / append an email to an IMAP mailbox and get the UID of the appended email. Lua

local chilkat = require("chilkat")

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

local imap = chilkat.Imap.new()

-- Connect to an IMAP server.
-- Use TLS
imap.ssl = true
imap.port = 993
local success = imap:connect("imap.example.com")
if not success then
    print(imap.last_error_text)
    return
end

-- Login
success = imap:login("myLogin", "myPassword")
if not success then
    print(imap.last_error_text)
    return
end

-- Check the capabilities of the IMAP server.
local cap = imap:capability()
print("IMAP capabilities: " .. cap)

-- If the capabilities string contains the substring "UIDPLUS", then
-- the UID of the appended email will be available in the AppendUid property (see below).

-- For example, the GMail IMAP server has these capabilities (at this current time)
-- * CAPABILITY IMAP4rev1 UNSELECT IDLE NAMESPACE QUOTA ID XLIST CHILDREN
-- X-GM-EXT-1 UIDPLUS COMPRESS=DEFLATE ENABLE MOVE CONDSTORE ESEARCH UTF8=ACCEPT
-- APPENDLIMIT=35882577 LIST-EXTENDED LIST-STATUS

local email = chilkat.Email.new()

-- Load the email from a .eml file.
success = email:load_eml("myEmail.eml")
if not success then
    print(email.last_error_text)
    return
end

success = imap:append_mail("Inbox", email)
if not success then
    print(imap.last_error_text)
    return
end

-- If the IMAP server supports the UIDPLUS extension, then the
-- imap.AppendUid will contain the UID of the appended email.
-- Otherwise AppendUid will be 0.
print("UID of appended email: " .. imap.append_uid)

-- If the IMAP server does NOT have UIDPLUS, then a program can
-- first select the mailbox, get the value of the UidNext property,
-- and then append.  The appended email SHOULD have a UID equal to
-- the UidNext that was obtained just prior to appending (assuming no other
-- program is simultaneously appending an email to the same mailbox).

-- Note: It is not required to select a mailbox to append.  The select is only
-- done for the purpose of obtaining the UIDNEXT value.
success = imap:select_mailbox("Inbox")
if not success then
    print(imap.last_error_text)
    return
end

local uidNext = imap.uid_next

success = imap:append_mail("Inbox", email)
if not success then
    print(imap.last_error_text)
    return
end

print("The UID of the appended email SHOULD be " .. uidNext)

print("Email uploaded to Inbox!")

-- Disconnect from the IMAP server.
success = imap:disconnect()