Gets a specific message using format=metadata.
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
set rest = Server.CreateObject("Chilkat_9_5_0.Rest")
' Provide a previously obtained OAuth2 access token.
set oauth2 = Server.CreateObject("Chilkat_9_5_0.OAuth2")
oauth2.AccessToken = "OAUTH2_ACCESS_TOKEN"
success = rest.SetAuthOAuth2(oauth2)
success = rest.Connect("www.googleapis.com",443,1,1)
If (success <> 1) Then
Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>"
End If
success = rest.AddPathParam("messageId","15fc23688c553739")
success = rest.AddQueryParam("format","metadata")
set sbJson = Server.CreateObject("Chilkat_9_5_0.StringBuilder")
success = rest.FullRequestNoBodySb("GET","/gmail/v1/users/me/messages/messageId",sbJson)
If (success <> 1) Then
Response.Write "<pre>" & Server.HTMLEncode( rest.LastErrorText) & "</pre>"
End If
If (rest.ResponseStatusCode <> 200) Then
Response.Write "<pre>" & Server.HTMLEncode( "Received error response code: " & rest.ResponseStatusCode) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "Response body:") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( sbJson.GetAsString()) & "</pre>"
End If
set json = Server.CreateObject("Chilkat_9_5_0.JsonObject")
success = json.LoadSb(sbJson)
' The following code parses the JSON response.
' A sample JSON response is shown below the sample code.
id = json.StringOf("id")
threadId = json.StringOf("threadId")
snippet = json.StringOf("snippet")
historyId = json.StringOf("historyId")
internalDate = json.StringOf("internalDate")
payloadMimeType = json.StringOf("payload.mimeType")
sizeEstimate = json.IntOf("sizeEstimate")
i = 0
count_i = json.SizeOfArray("labelIds")
Do While i < count_i
json.I = i
strVal = json.StringOf("labelIds[i]")
i = i + 1
Loop
i = 0
count_i = json.SizeOfArray("payload.headers")
Do While i < count_i
json.I = i
name = json.StringOf("payload.headers[i].name")
value = json.StringOf("payload.headers[i].value")
i = i + 1
Loop
Response.Write "<pre>" & Server.HTMLEncode( "Example Completed.") & "</pre>"
%>
</body>
</html>
{
"id": "15fc23688c553739",
"threadId": "15fc23688c553739",
"labelIds": [
"IMPORTANT",
"SENT",
"INBOX"
],
"snippet": "This is a test. \u200b",
"historyId": "1438",
"internalDate": "1510791874000",
"payload": {
"mimeType": "multipart/mixed",
"headers": [
{
"name": "MIME-Version",
"value": "1.0"
},
{
"name": "Received",
"value": "by 10.25.23.105 with HTTP; Wed, 15 Nov 2017 16:24:34 -0800 (PST)"
},
{
"name": "X-Originating-IP",
"value": "[2601:249:e00:9093:e894:b27f:e5d6:d01d]"
},
{
"name": "Date",
"value": "Wed, 15 Nov 2017 18:24:34 -0600"
},
{
"name": "Delivered-To",
"value": "matt@chilkat.io"
},
{
"name": "Message-ID",
"value": "\u003cCAPhjyBM1qqXS6NVB65W8Zt5-McF03qWSRDjW5am66wTMuard=w@mail.gmail.com\u003e"
},
{
"name": "Subject",
"value": "Test HTML email with image and attachment."
},
{
"name": "From",
"value": "Matt Fausey \u003cmatt@chilkat.io\u003e"
},
{
"name": "To",
"value": "Matt Fausey \u003cmatt@chilkat.io\u003e"
},
{
"name": "Content-Type",
"value": "multipart/mixed; boundary=\"001a11401a6c097887055e0ea572\""
}
]
},
"sizeEstimate": 11716
}