Classic ASP
Download a Specific GMail Message into a Chilkat Email Object

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

Classic ASP
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

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

set http = Server.CreateObject("Chilkat.Http")
http.AuthToken = "GMAIL-ACCESS-TOKEN"

'  The id of the GMail message to download.
id = "166e50fed0b9b0cb"
userId = "me"

success = http.SetUrlVar("userId","me")
success = http.SetUrlVar("id",id)

'  Fetch the email.
url = "https://www.googleapis.com/gmail/v1/users/{$userId}/messages/{$id}?format=raw"
set sbJson = Server.CreateObject("Chilkat.StringBuilder")
success = http.DownloadSb(url,"utf-8",sbJson)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
    Response.End
End If

set json = Server.CreateObject("Chilkat.JsonObject")
success = json.LoadSb(sbJson)
json.EmitCompact = 0

If (http.LastStatus <> 200) Then
    Response.Write "<pre>" & Server.HTMLEncode( json.Emit()) & "</pre>"
    Response.Write "<pre>" & Server.HTMLEncode( "Failed.") & "</pre>"
    Response.End
End If

'  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..
set sbRaw = Server.CreateObject("Chilkat.StringBuilder")
success = json.StringOfSb("raw",sbRaw)
success = sbRaw.Decode("base64url","utf-8")

set email = Server.CreateObject("Chilkat.Email")
success = email.SetFromMimeSb(sbRaw)

'  Now we can use the email API to do whatever we desire..
Response.Write "<pre>" & Server.HTMLEncode( "From: " & email.FromAddress) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "Subject: " & email.Subject) & "</pre>"
'  ...

%>
</body>
</html>