(Lianja) Download a Specific GMail Message into a Chilkat Email Object

Demonstrates how to download a GMail message into a Chilkat Email object.

Chilkat Lianja Extension Download Chilkat Lianja Extension

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

loHttp = createobject("CkHttp")
loHttp.AuthToken = "GMAIL-ACCESS-TOKEN"

// The id of the GMail message to download.
lcId = "166e50fed0b9b0cb"
lcUserId = "me"

loHttp.SetUrlVar("userId","me")
loHttp.SetUrlVar("id",lcId)

// Fetch the email.
lcUrl = "https://www.googleapis.com/gmail/v1/users/{$userId}/messages/{$id}?format=raw"
loSbJson = createobject("CkStringBuilder")
llSuccess = loHttp.DownloadSb(lcUrl,"utf-8",loSbJson)
if (llSuccess <> .T.) then
    ? loHttp.LastErrorText
    release loHttp
    release loSbJson
    return
endif

loJson = createobject("CkJsonObject")
loJson.LoadSb(loSbJson)
loJson.EmitCompact = .F.

if (loHttp.LastStatus <> 200) then
    ? loJson.Emit()
    ? "Failed."
    release loHttp
    release loSbJson
    release loJson
    return
endif

// The returned JSON contains something like this:

// {
//   "id": "166e50fed0b9b0cb",
//   "threadId": "166e50fed0b9b0cb",
//   "labelIds": [
//     "CATEGORY_SOCIAL",
//     "INBOX"
//   ],
//   "snippet": "...",
//   "historyId": "582477",
//   "internalDate": "1541441317000",
//   "sizeEstimate": 28603,
//   "raw": "BASE64URL_CONTENT"
// }

// The RFC822 MIME of the email is contained in the "raw" as a base64URL encoded string.
// Let's decode and load into a Chilkat email object..
loSbRaw = createobject("CkStringBuilder")
loJson.StringOfSb("raw",loSbRaw)
loSbRaw.Decode("base64url","utf-8")

loEmail = createobject("CkEmail")
loEmail.SetFromMimeSb(loSbRaw)

// Now we can use the email API to do whatever we desire..
? "From: " + loEmail.FromAddress
? "Subject: " + loEmail.Subject
// ...


release loHttp
release loSbJson
release loJson
release loSbRaw
release loEmail