Lianja
Lianja
Google People API - List the User's Contacts
See more Google People Examples
Gets a list of people in the user's contacts.Chilkat Lianja Downloads
llSuccess = .F.
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
// It is assumed we previously obtained an OAuth2 access token.
// This example loads the JSON access token file
// originally obtained by this example: Get Google People API OAuth2 Access Token
// or refreshed by this example: Refresh Google People API OAuth2 Access Token
loJsonToken = createobject("CkJsonObject")
llSuccess = loJsonToken.LoadFile("qa_data/tokens/googlePeople.json")
if (llSuccess <> .T.) then
? "Failed to load googleContacts.json"
release loJsonToken
return
endif
loHttp = createobject("CkHttp")
loHttp.AuthToken = loJsonToken.StringOf("access_token")
loSbResponseBody = createobject("CkStringBuilder")
llSuccess = loHttp.QuickGetSb("https://people.googleapis.com/v1/people/me/connections?personFields=names,addresses,emailAddresses",loSbResponseBody)
if (llSuccess = .F.) then
? loHttp.LastErrorText
? loSbResponseBody.GetAsString()
release loJsonToken
release loHttp
release loSbResponseBody
return
endif
// Sample JSON Response
// Use this online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON
// {
// "connections": [
// {
// "resourceName": "people/c8871101035606120608",
// "etag": "%EgkBAj0JQhBANy4aBAECBQciDERLSGdVTFNPbzNJPQ==",
// "names": [
// {
// "metadata": {
// "primary": true,
// "source": {
// "type": "CONTACT",
// "id": "7b1c7b6409e718a0"
// }
// },
// "displayName": "Chilkat Cloud",
// "familyName": "Cloud",
// "givenName": "Chilkat",
// "displayNameLastFirst": "Cloud, Chilkat",
// "unstructuredName": "Chilkat Cloud"
// }
// ],
// "emailAddresses": [
// {
// "metadata": {
// "primary": true,
// "source": {
// "type": "CONTACT",
// "id": "7b1c7b6409e718a0"
// }
// },
// "value": "support@***.com"
// }
// ]
// },
// {
// "resourceName": "people/c7607335470312011517",
// "etag": "%EgkBAj0JQhBANy4aBAECBQciDGZETUtHVTVMazI4PQ==",
// "names": [
// {
// "metadata": {
// "primary": true,
// "source": {
// "type": "CONTACT",
// "id": "6992af4e0b2d36fd"
// }
// },
// "displayName": "Matt Smith",
// "familyName": "Smith",
// "givenName": "Matt",
// "displayNameLastFirst": "Smith, Matt",
// "unstructuredName": "Matt Smith"
// }
// ],
// "addresses": [
// {
// "metadata": {
// "primary": true,
// "source": {
// "type": "CONTACT",
// "id": "6992af4e0b2d36fd"
// }
// },
// "formattedValue": "2222 E Foorest Ave\nWheaton, IL 60999\nUS",
// "streetAddress": "2222 E Foorest Ave",
// "city": "Wheaton",
// "region": "IL",
// "postalCode": "60999",
// "country": "US",
// "countryCode": "US"
// }
// ],
// "emailAddresses": [
// {
// "metadata": {
// "primary": true,
// "source": {
// "type": "CONTACT",
// "id": "6992af4e0b2d36fd"
// }
// },
// "value": "matt@***.com"
// },
// {
// "metadata": {
// "source": {
// "type": "CONTACT",
// "id": "6992af4e0b2d36fd"
// }
// },
// "value": "admin@***.com"
// }
// ]
// }
// ],
// "totalPeople": 2,
// "totalItems": 2
// }
loJson = createobject("CkJsonObject")
loJson.EmitCompact = .F.
loJson.Load(loSbResponseBody.GetAsString())
? loJson.Emit()
lnTotalPeople = loJson.IntOf("totalPeople")
lnTotalItems = loJson.IntOf("totalItems")
i = 0
lnCount_i = loJson.SizeOfArray("connections")
do while i < lnCount_i
loJson.I = i
lcResourceName = loJson.StringOf("connections[i].resourceName")
lcEtag = loJson.StringOf("connections[i].etag")
j = 0
lnCount_j = loJson.SizeOfArray("connections[i].names")
do while j < lnCount_j
loJson.J = j
llMetadataPrimary = loJson.BoolOf("connections[i].names[j].metadata.primary")
lcMetadataSourceType = loJson.StringOf("connections[i].names[j].metadata.source.type")
lcMetadataSourceId = loJson.StringOf("connections[i].names[j].metadata.source.id")
lcDisplayName = loJson.StringOf("connections[i].names[j].displayName")
lcFamilyName = loJson.StringOf("connections[i].names[j].familyName")
lcGivenName = loJson.StringOf("connections[i].names[j].givenName")
lcDisplayNameLastFirst = loJson.StringOf("connections[i].names[j].displayNameLastFirst")
lcUnstructuredName = loJson.StringOf("connections[i].names[j].unstructuredName")
j = j + 1
enddo
j = 0
lnCount_j = loJson.SizeOfArray("connections[i].emailAddresses")
do while j < lnCount_j
loJson.J = j
llMetadataPrimary = loJson.BoolOf("connections[i].emailAddresses[j].metadata.primary")
lcMetadataSourceType = loJson.StringOf("connections[i].emailAddresses[j].metadata.source.type")
lcMetadataSourceId = loJson.StringOf("connections[i].emailAddresses[j].metadata.source.id")
lcValue = loJson.StringOf("connections[i].emailAddresses[j].value")
j = j + 1
enddo
j = 0
lnCount_j = loJson.SizeOfArray("connections[i].addresses")
do while j < lnCount_j
loJson.J = j
llMetadataPrimary = loJson.BoolOf("connections[i].addresses[j].metadata.primary")
lcMetadataSourceType = loJson.StringOf("connections[i].addresses[j].metadata.source.type")
lcMetadataSourceId = loJson.StringOf("connections[i].addresses[j].metadata.source.id")
lcFormattedValue = loJson.StringOf("connections[i].addresses[j].formattedValue")
lcStreetAddress = loJson.StringOf("connections[i].addresses[j].streetAddress")
lcCity = loJson.StringOf("connections[i].addresses[j].city")
lcRegion = loJson.StringOf("connections[i].addresses[j].region")
lcPostalCode = loJson.StringOf("connections[i].addresses[j].postalCode")
lcCountry = loJson.StringOf("connections[i].addresses[j].country")
lcCountryCode = loJson.StringOf("connections[i].addresses[j].countryCode")
j = j + 1
enddo
i = i + 1
enddo
release loJsonToken
release loHttp
release loSbResponseBody
release loJson