Xojo Plugin

Upload .eml File to an IMAP Mailbox

See more IMAP Examples

Demonstrates how to upload the MIME source of an email to a mailbox on an IMAP server. Xojo Plugin

Dim success As Boolean
success = False

Dim imap As New Chilkat.Imap

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

// Connect to an IMAP server.
// Use TLS
imap.Ssl = True
imap.Port = 993
success = imap.Connect("MY-IMAP-DOMAIN")
If (success <> True) Then
    System.DebugLog(imap.LastErrorText)
    Return
End If

// Login
success = imap.Login("MY-IMAP-LOGIN","MY-IMAP-PASSWORD")
If (success <> True) Then
    System.DebugLog(imap.LastErrorText)
    Return
End If

Dim sbMime As New Chilkat.StringBuilder
success = sbMime.LoadFile("qa_data/eml/emoji_pizza.eml","utf-8")

// Upload to the mailbox.
success = imap.AppendMime("[Gmail]/testFolder",sbMime.GetAsString())
If (success <> True) Then
    System.DebugLog(imap.LastErrorText)
    Return
End If

success = imap.Disconnect()

System.DebugLog("OK.")