Classic ASP
Classic ASP
Google People API - Create Contact
See more Google People Examples
Create a new contact.Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
' 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
set jsonToken = Server.CreateObject("Chilkat.JsonObject")
success = jsonToken.LoadFile("qa_data/tokens/googlePeople.json")
If (success <> 1) Then
Response.Write "<pre>" & Server.HTMLEncode( "Failed to load googleContacts.json") & "</pre>"
Response.End
End If
set http = Server.CreateObject("Chilkat.Http")
http.AuthToken = jsonToken.StringOf("access_token")
' Implements the following CURL command:
' curl -H "Content-Type: application/json" -X POST
' -d '{
' "names": [{ "givenName": "John", "familyName": "Doe" }]
' }'
' https://people.googleapis.com/v1/people:createContact
' Use the following online tool to generate HTTP code from a CURL command
' Convert a cURL Command to HTTP Source Code
' Use this online tool to generate code from sample JSON:
' Generate Code to Create JSON
' The following JSON is sent in the request body.
' {
' "names": [
' {
' "givenName": "John",
' "familyName": "Doe"
' }
' ]
' }
set json = Server.CreateObject("Chilkat.JsonObject")
success = json.UpdateString("names[0].givenName","John")
success = json.UpdateString("names[0].familyName","Doe")
set resp = Server.CreateObject("Chilkat.HttpResponse")
success = http.HttpJson("POST","https://people.googleapis.com/v1/people:createContact",json,"application/json",resp)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
Response.End
End If
set sbResponseBody = Server.CreateObject("Chilkat.StringBuilder")
success = resp.GetBodySb(sbResponseBody)
set jResp = Server.CreateObject("Chilkat.JsonObject")
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = 0
Response.Write "<pre>" & Server.HTMLEncode( "Response Body:") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( jResp.Emit()) & "</pre>"
respStatusCode = resp.StatusCode
Response.Write "<pre>" & Server.HTMLEncode( "Response Status Code = " & respStatusCode) & "</pre>"
If (respStatusCode >= 400) Then
Response.Write "<pre>" & Server.HTMLEncode( "Response Header:") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( resp.Header) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "Failed.") & "</pre>"
Response.End
End If
' Sample JSON response:
' (Sample code for parsing the JSON response is shown below)
' {
' "resourceName": "people/c172365763025317520",
' "etag": "%EigBAj0DBAUGBwgJPgoLPwwNDg8QQBESExQVFhc1GTQ3HyEiIyQlJicuGgQBAgUHIgxleVowR3U1SFZhcz0=",
' "metadata": {
' "sources": [
' {
' "type": "CONTACT",
' "id": "2645dbf8c902e90",
' "etag": "#eyZ0Gu5HVas=",
' "updateTime": "2020-08-03T22:46:03.410Z"
' }
' ],
' "objectType": "PERSON"
' },
' "names": [
' {
' "metadata": {
' "primary": true,
' "source": {
' "type": "CONTACT",
' "id": "2645dbf8c902e90"
' }
' },
' "displayName": "John Doe",
' "familyName": "Doe",
' "givenName": "John",
' "displayNameLastFirst": "Doe, John",
' "unstructuredName": "John Doe"
' }
' ],
' "photos": [
' {
' "metadata": {
' "primary": true,
' "source": {
' "type": "CONTACT",
' "id": "2645dbf8c902e90"
' }
' },
' "url": "https://lh3.googleusercontent.com/-XdUIqdMkCWA/AAAAAAAAAAI/AAAAAAAAAAA/V8BNOaftJmYG2hHugNzYued7G9QFdbZOACLcDEAEiGQoBShD___________8BGNuwiP7______wE/s100/photo.jpg",
' "default": true
' }
' ],
' "memberships": [
' {
' "metadata": {
' "source": {
' "type": "CONTACT",
' "id": "2645dbf8c902e90"
' }
' },
' "contactGroupMembership": {
' "contactGroupId": "myContacts",
' "contactGroupResourceName": "contactGroups/myContacts"
' }
' }
' ]
' }
' Sample code for parsing the JSON response...
' Use the following online tool to generate parsing code from sample JSON:
' Generate Parsing Code from JSON
resourceName = jResp.StringOf("resourceName")
etag = jResp.StringOf("etag")
metadataObjectType = jResp.StringOf("metadata.objectType")
i = 0
count_i = jResp.SizeOfArray("metadata.sources")
Do While i < count_i
jResp.I = i
v_type = jResp.StringOf("metadata.sources[i].type")
id = jResp.StringOf("metadata.sources[i].id")
etag = jResp.StringOf("metadata.sources[i].etag")
updateTime = jResp.StringOf("metadata.sources[i].updateTime")
i = i + 1
Loop
i = 0
count_i = jResp.SizeOfArray("names")
Do While i < count_i
jResp.I = i
metadataPrimary = jResp.BoolOf("names[i].metadata.primary")
metadataSourceType = jResp.StringOf("names[i].metadata.source.type")
metadataSourceId = jResp.StringOf("names[i].metadata.source.id")
displayName = jResp.StringOf("names[i].displayName")
familyName = jResp.StringOf("names[i].familyName")
givenName = jResp.StringOf("names[i].givenName")
displayNameLastFirst = jResp.StringOf("names[i].displayNameLastFirst")
unstructuredName = jResp.StringOf("names[i].unstructuredName")
i = i + 1
Loop
i = 0
count_i = jResp.SizeOfArray("photos")
Do While i < count_i
jResp.I = i
metadataPrimary = jResp.BoolOf("photos[i].metadata.primary")
metadataSourceType = jResp.StringOf("photos[i].metadata.source.type")
metadataSourceId = jResp.StringOf("photos[i].metadata.source.id")
url = jResp.StringOf("photos[i].url")
default = jResp.BoolOf("photos[i].default")
i = i + 1
Loop
i = 0
count_i = jResp.SizeOfArray("memberships")
Do While i < count_i
jResp.I = i
metadataSourceType = jResp.StringOf("memberships[i].metadata.source.type")
metadataSourceId = jResp.StringOf("memberships[i].metadata.source.id")
contactGroupMembershipContactGroupId = jResp.StringOf("memberships[i].contactGroupMembership.contactGroupId")
contactGroupMembershipContactGroupResourceName = jResp.StringOf("memberships[i].contactGroupMembership.contactGroupResourceName")
i = i + 1
Loop
%>
</body>
</html>