AutoIt
AutoIt
Google Contacts - Retrieve as JSON
See more Google APIs Examples
Demonstrates how to retrieve Google Contacts as JSON.Chilkat AutoIt Downloads
Local $bSuccess = False
; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
; --------------------------------------------------------------------------------------------------------
; Note: The code for setting up the Chilkat REST object and making the initial connection can be done once.
; Once connected, the REST object may be re-used for many REST API calls.
; (It's a good idea to put the connection setup code in a separate function/subroutine.)
; --------------------------------------------------------------------------------------------------------
; It is assumed we previously obtained an OAuth2 access token.
; This example loads the JSON access token file
; saved by this example: Get Google Contacts OAuth2 Access Token
$oJsonToken = ObjCreate("Chilkat.JsonObject")
$bSuccess = $oJsonToken.LoadFile("qa_data/tokens/googleContacts.json")
If ($bSuccess <> True) Then
ConsoleWrite("Failed to load googleContacts.json" & @CRLF)
Exit
EndIf
$oGAuth = ObjCreate("Chilkat.AuthGoogle")
$oGAuth.AccessToken = $oJsonToken.StringOf("access_token")
$oRest = ObjCreate("Chilkat.Rest")
; Connect using TLS.
Local $bAutoReconnect = True
$bSuccess = $oRest.Connect("www.google.com",443,True,$bAutoReconnect)
; Provide the authentication credentials (i.e. the access token)
$oRest.SetAuthGoogle($oGAuth)
; ----------------------------------------------
; OK, the REST connection setup is completed..
; ----------------------------------------------
; To retrieve the contacts, we need to send the following:
; GET /m8/feeds/contacts/default/full
; GData-Version: 3.0
; To get the contacts data in JSON format, set the "alt" query parameter to "json"
$oRest.AddQueryParam("alt","json")
$oRest.AddHeader("GData-Version","3.0")
$oSbResponseBody = ObjCreate("Chilkat.StringBuilder")
$bSuccess = $oRest.FullRequestNoBodySb("GET","/m8/feeds/contacts/default/full",$oSbResponseBody)
If ($bSuccess <> True) Then
ConsoleWrite($oRest.LastErrorText & @CRLF)
Exit
EndIf
; A successful response will have a status code equal to 200.
If ($oRest.ResponseStatusCode <> 200) Then
ConsoleWrite("response status code = " & $oRest.ResponseStatusCode & @CRLF)
ConsoleWrite("response status text = " & $oRest.ResponseStatusText & @CRLF)
ConsoleWrite("response header: " & $oRest.ResponseHeader & @CRLF)
ConsoleWrite("response body: " & $oSbResponseBody.GetAsString() & @CRLF)
Exit
EndIf
; If the 200 response was received, then the contacts JSON is contained
; in the response body.
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.LoadSb($oSbResponseBody)
$oJson.EmitCompact = False
; Save the pretty-printed JSON response to a file.
$oSbResponseBody.Clear
$oJson.EmitSb($oSbResponseBody)
$oSbResponseBody.WriteFile("qa_output/google_contacts.json","utf-8",False)
; Parse the Google Contacts JSON, and iterate over the contacts..
Local $iTotalResults = $oJson.IntOf("feed.openSearch$totalResults.$t")
Local $iStartIndex = $oJson.IntOf("feed.openSearch$startIndex.$t")
Local $itemsPerPage = $oJson.IntOf("feed.openSearch$itemsPerPage.$t")
ConsoleWrite("totalResults = " & $iTotalResults & @CRLF)
ConsoleWrite("startIndex = " & $iStartIndex & @CRLF)
ConsoleWrite("itemsPerPage = " & $itemsPerPage & @CRLF)
Local $iNumEntries = $oJson.SizeOfArray("feed.entry")
Local $i = 0
While $i < $iNumEntries
$oJson.I = $i
ConsoleWrite(($i + 1) & " ----" & @CRLF)
ConsoleWrite("title: " & $oJson.StringOf("feed.entry[i].title.$t") & @CRLF)
Local $sFullName = $oJson.StringOf("feed.entry[i].gd$name.gd$fullName.$t")
If ($oJson.LastMethodSuccess = True) Then
ConsoleWrite("fullName: " & $sFullName & @CRLF)
EndIf
; There can be multiple email addresses, so it's stored as a JSON array..
Local $iNumEmailAddresses = $oJson.SizeOfArray("feed.entry[i].gd$email")
Local $iJ = 0
While $iJ < $iNumEmailAddresses
Local $sEmailAddress = $oJson.StringOf("feed.entry[i].gd$email[j].address")
If ($oJson.LastMethodSuccess = True) Then
ConsoleWrite("email address: " & $sEmailAddress & @CRLF)
EndIf
$iJ = $iJ + 1
Wend
$i = $i + 1
Wend
; A sample Google Contacts JSON response:
; {
; "version": "1.0",
; "encoding": "UTF-8",
; "feed": {
; "xmlns": "http://www.w3.org/2005/Atom",
; "xmlns$openSearch": "http://a9.com/-/spec/opensearch/1.1/",
; "xmlns$gContact": "http://schemas.google.com/contact/2008",
; "xmlns$batch": "http://schemas.google.com/gdata/batch",
; "xmlns$gd": "http://schemas.google.com/g/2005",
; "gd$etag": "\"QHw5eTVSLyt7I2A9XRFaE0kNTwI.\"",
; "id": {
; "$t": "chilkat.support@gmail.com"
; },
; "updated": {
; "$t": "2016-11-17T01:57:41.221Z"
; },
; "category": [
; {
; "scheme": "http://schemas.google.com/g/2005#kind",
; "term": "http://schemas.google.com/contact/2008#contact"
; }
; ],
; "title": {
; "$t": "Chilkat Support's Contacts"
; },
; "link": [
; {
; "rel": "alternate",
; "type": "text/html",
; "href": "https://www.googleapis.com/"
; },
; {
; "rel": "http://schemas.google.com/g/2005#feed",
; "type": "application/atom+xml",
; "href": "https://www.googleapis.com/m8/feeds/contacts/chilkat.support%40gmail.com/full"
; },
; {
; "rel": "http://schemas.google.com/g/2005#post",
; "type": "application/atom+xml",
; "href": "https://www.googleapis.com/m8/feeds/contacts/chilkat.support%40gmail.com/full"
; },
; {
; "rel": "http://schemas.google.com/g/2005#batch",
; "type": "application/atom+xml",
; "href": "https://www.googleapis.com/m8/feeds/contacts/chilkat.support%40gmail.com/full/batch"
; },
; {
; "rel": "self",
; "type": "application/atom+xml",
; "href": "https://www.googleapis.com/m8/feeds/contacts/chilkat.support%40gmail.com/full?max-results=25&alt=json"
; },
; {
; "rel": "next",
; "type": "application/atom+xml",
; "href": "https://www.googleapis.com/m8/feeds/contacts/chilkat.support%40gmail.com/full?max-results=25&alt=json&start-index=26"
; }
; ],
; "author": [
; {
; "name": {
; "$t": "Chilkat Support"
; },
; "email": {
; "$t": "chilkat.support@gmail.com"
; }
; }
; ],
; "generator": {
; "version": "1.0",
; "uri": "http://www.google.com/m8/feeds",
; "$t": "Contacts"
; },
; "openSearch$totalResults": {
; "$t": "350"
; },
; "openSearch$startIndex": {
; "$t": "1"
; },
; "openSearch$itemsPerPage": {
; "$t": "25"
; },
; "entry": [
; {
; "id": {
; "$t": "http://www.google.com/m8/feeds/contacts/chilkat.support%40gmail.com/base/0"
; },
; "gd$etag": "\"SX8zcTVSLyt7I2A9WxBXFU4MQwI.\"",
; "updated": {
; "$t": "2010-01-26T20:07:48.189Z"
; },
; "app$edited": {
; "xmlns$app": "http://www.w3.org/2007/app",
; "$t": "2010-01-26T20:07:48.189Z"
; },
; "category": [
; {
; "scheme": "http://schemas.google.com/g/2005#kind",
; "term": "http://schemas.google.com/contact/2008#contact"
; }
; ],
; "title": {
; "$t": "Joe Sample"
; },
; "link": [
; {
; "rel": "http://schemas.google.com/contacts/2008/rel#photo",
; "type": "image/*",
; "href": "https://www.googleapis.com/m8/feeds/photos/media/chilkat.support%40gmail.com/0"
; },
; {
; "rel": "self",
; "type": "application/atom+xml",
; "href": "https://www.googleapis.com/m8/feeds/contacts/chilkat.support%40gmail.com/full/0"
; },
; {
; "rel": "edit",
; "type": "application/atom+xml",
; "href": "https://www.googleapis.com/m8/feeds/contacts/chilkat.support%40gmail.com/full/0"
; }
; ],
; "gd$name": {
; "gd$fullName": {
; "$t": "Joe Sample"
; },
; "gd$givenName": {
; "$t": "Joe"
; },
; "gd$familyName": {
; "$t": "Sample"
; }
; },
; "gd$email": [
; {
; "address": "somebody@gmail.com",
; "primary": "true",
; "rel": "http://schemas.google.com/g/2005#other"
; }
; ]
; },
; ... more entries ...
;