Lua

Outlook List Contacts

See more Outlook Contact Examples

List Outlook Contacts Lua

local chilkat = require("chilkat")

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

local http = chilkat.Http.new()

-- Use your previously obtained access token here: Get Outlook Contacts OAuth2 Access Token (Azure AD v2.0 Endpoint).

local jsonToken = chilkat.JsonObject.new()
local success = jsonToken:load_file("qa_data/tokens/outlookContacts.json")
if not success then
    print(jsonToken.last_error_text)
    return
end

http.auth_token = jsonToken:string_of("access_token")

-- Send the following GET:

-- GET https://graph.microsoft.com/v1.0/me/contacts
local sbJson = chilkat.StringBuilder.new()
success = http:quick_get_sb("https://graph.microsoft.com/v1.0/me/contacts", sbJson)
if not success then
    print(http.last_error_text)
    return
end

local statusCode = http.last_status
print("Response status code = " .. statusCode)

if statusCode ~= 200 then
    print(sbJson:get_as_string())
    print("Failed.")
    return
end

local jResp = chilkat.JsonObject.new()
jResp:load_sb(sbJson)
jResp.emit_compact = false
print(jResp:emit())

-- Sample output:

-- Use this online tool to generate parsing code from sample JSON:
-- Generate Parsing Code from JSON

-- {
--   "@odata.context": "https://graph.microsoft.com/v1.0/$metadata#users('4ee732c3-322e-4a6b-b729-2fd1eb5c6004')/contacts",
--   "value": [
--     {
--       "@odata.etag": "W/\"EQAAABYAAABUcG0qWqkmQYqWLHQataQxAAD0iYfT\"",
--       "id": "AAMkADYzZWE3YmZmLWU0YzgtNGNkZC04MGE1LWFiYTFlNTRlY2QwYQBGAAAAAAAu7cUXL5YOTrdsUIw7-v8FBwBUcG0qWqkmQYqWLHQataQxAAAAAAEOAABUcG0qWqkmQYqWLHQataQxAAD0sxexAAA=",
--       "createdDateTime": "2021-06-29T16:32:05Z",
--       "lastModifiedDateTime": "2021-06-29T16:32:06Z",
--       "changeKey": "EQAAABYAAABUcG0qWqkmQYqWLHQataQxAAD0iYfT",
--       "categories": [
--       ],
--       "parentFolderId": "AAMkADYzZWE3YmZmLWU0YzgtNGNkZC04MGE1LWFiYTFlNTRlY2QwYQAuAAAAAAAu7cUXL5YOTrdsUIw7-v8FAQBUcG0qWqkmQYqWLHQataQxAAAAAAEOAAA=",
--       "birthday": null,
--       "fileAs": "",
--       "displayName": "Pavel Bansky",
--       "givenName": "Pavel",
--       "initials": null,
--       "middleName": null,
--       "nickName": null,
--       "surname": "Bansky",
--       "title": null,
--       "yomiGivenName": null,
--       "yomiSurname": null,
--       "yomiCompanyName": null,
--       "generation": null,
--       "imAddresses": [
--       ],
--       "jobTitle": null,
--       "companyName": null,
--       "department": null,
--       "officeLocation": null,
--       "profession": null,
--       "businessHomePage": null,
--       "assistantName": null,
--       "manager": null,
--       "homePhones": [
--       ],
--       "mobilePhone": null,
--       "businessPhones": [
--         "+1 732 555 0102"
--       ],
--       "spouseName": null,
--       "personalNotes": "",
--       "children": [
--       ],
--       "emailAddresses": [
--         {
--           "name": "Pavel Bansky",
--           "address": "pavelb@fabrikam.onmicrosoft.com"
--         }
--       ],
--       "homeAddress": {},
--       "businessAddress": {},
--       "otherAddress": {}
--     },
-- ...
--   ]
-- }

local odata_etag = ""
local id = ""
local createdDateTime = ""
local lastModifiedDateTime = ""
local changeKey = ""
local parentFolderId = ""
local birthday = ""
local fileAs = ""
local displayName = ""
local givenName = ""
local initials = ""
local middleName = ""
local nickName = ""
local surname = ""
local title = ""
local yomiGivenName = ""
local yomiSurname = ""
local yomiCompanyName = ""
local generation = ""
local jobTitle = ""
local companyName = ""
local department = ""
local officeLocation = ""
local profession = ""
local businessHomePage = ""
local assistantName = ""
local manager = ""
local mobilePhone = ""
local spouseName = ""
local personalNotes = ""
local j = 0
local count_j = 0
local strVal = ""
local name = ""
local address = ""

local odata_context = jResp:string_of("\"@odata.context\"")
local i = 0
local count_i = jResp:size_of_array("value")
while i < count_i do
    jResp.i = i
    odata_etag = jResp:string_of("value[i].\"@odata.etag\"")
    id = jResp:string_of("value[i].id")
    createdDateTime = jResp:string_of("value[i].createdDateTime")
    lastModifiedDateTime = jResp:string_of("value[i].lastModifiedDateTime")
    changeKey = jResp:string_of("value[i].changeKey")
    parentFolderId = jResp:string_of("value[i].parentFolderId")
    birthday = jResp:string_of("value[i].birthday")
    fileAs = jResp:string_of("value[i].fileAs")
    displayName = jResp:string_of("value[i].displayName")
    givenName = jResp:string_of("value[i].givenName")
    initials = jResp:string_of("value[i].initials")
    middleName = jResp:string_of("value[i].middleName")
    nickName = jResp:string_of("value[i].nickName")
    surname = jResp:string_of("value[i].surname")
    title = jResp:string_of("value[i].title")
    yomiGivenName = jResp:string_of("value[i].yomiGivenName")
    yomiSurname = jResp:string_of("value[i].yomiSurname")
    yomiCompanyName = jResp:string_of("value[i].yomiCompanyName")
    generation = jResp:string_of("value[i].generation")
    jobTitle = jResp:string_of("value[i].jobTitle")
    companyName = jResp:string_of("value[i].companyName")
    department = jResp:string_of("value[i].department")
    officeLocation = jResp:string_of("value[i].officeLocation")
    profession = jResp:string_of("value[i].profession")
    businessHomePage = jResp:string_of("value[i].businessHomePage")
    assistantName = jResp:string_of("value[i].assistantName")
    manager = jResp:string_of("value[i].manager")
    mobilePhone = jResp:string_of("value[i].mobilePhone")
    spouseName = jResp:string_of("value[i].spouseName")
    personalNotes = jResp:string_of("value[i].personalNotes")
    j = 0
    count_j = jResp:size_of_array("value[i].categories")
    while j < count_j do
        jResp.j = j
        j = j + 1
    end

    j = 0
    count_j = jResp:size_of_array("value[i].imAddresses")
    while j < count_j do
        jResp.j = j
        j = j + 1
    end

    j = 0
    count_j = jResp:size_of_array("value[i].homePhones")
    while j < count_j do
        jResp.j = j
        j = j + 1
    end

    j = 0
    count_j = jResp:size_of_array("value[i].businessPhones")
    while j < count_j do
        jResp.j = j
        strVal = jResp:string_of("value[i].businessPhones[j]")
        j = j + 1
    end

    j = 0
    count_j = jResp:size_of_array("value[i].children")
    while j < count_j do
        jResp.j = j
        j = j + 1
    end

    j = 0
    count_j = jResp:size_of_array("value[i].emailAddresses")
    while j < count_j do
        jResp.j = j
        name = jResp:string_of("value[i].emailAddresses[j].name")
        address = jResp:string_of("value[i].emailAddresses[j].address")
        j = j + 1
    end

    i = i + 1
end