Sample code for 30+ languages & platforms
Lua

GeoOp - Create a New User

See more GeoOp Examples

Create a new GeoOp user.

Chilkat Lua Downloads

Lua
local chilkat = require("chilkat")

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

-- This example also assumes an OAuth2 access token was previously fetched.
-- and saved in a JSON file.

-- First get our previously obtained access token.
-- {"access_token":"e6dqdG....mzjpT04w==","token_type":"Bearer","expires_in":2592000,"owner_id":999236}
local jsonToken = chilkat.JsonObject.new()
local success = jsonToken:load_file("qa_data/tokens/geoop.json")

-- This example assumes we previously obtained an access token
local oauth2 = chilkat.OAuth2.new()
oauth2.access_token = jsonToken:string_of("access_token")

local rest = chilkat.Rest.new()

-- Connect to GeoOp..
-- Note: The same REST object, once connected, can be used for many requests.
-- The bAutoReconnect argument allows it to automatically reconnect as required for any subsequent request.

local bAutoReconnect = true
success = rest:connect("api.geoop.com", 443, true, bAutoReconnect)
if not success then
    print(rest.last_error_text)
    return
end

-- Provide the authentication credentials (i.e. the access token)
rest:set_auth_oauth2(oauth2)

-- Set the X-Version header.
rest:add_header("X-Version", "1.0")

-- To create a new user, we must build and send the following JSON:
-- {
--     "users": [
--         {
--             "account": {
--                 "id": 39409    <--- This account ID must be one that already exists.
--             },
--             "firstName": "Geoff",
--             "lastName": "Wirtz",
--             "companyName": "Sample Company",
--             "phone": "+12349282001",
--             "mobile": "+12349332744",
--             "email": "gwirtz@example2.com",
--             "login": "gwirtz_sample2",
--             "newPassword": "pa$$wordz",
--             "newPasswordConfirm": "pa$$wordz"
--         }
--     ]
-- }

local jsonUser = chilkat.JsonObject.new()
jsonUser:update_int("users[0].account.id", 39409)
jsonUser:update_string("users[0].firstName", "Geoff")
jsonUser:update_string("users[0].lastName", "Wirtz")
jsonUser:update_string("users[0].companyName", "Sample Company")
jsonUser:update_string("users[0].phone", "+12349282001")
jsonUser:update_string("users[0].mobile", "+12349332744")
jsonUser:update_string("users[0].email", "gwirtz@example2.com")
jsonUser:update_string("users[0].login", "gwirtz_sample2")
jsonUser:update_string("users[0].newPassword", "pa$$wordz")
jsonUser:update_string("users[0].newPasswordConfirm", "pa$$wordz")

-- Examine the JSON we're about to send...
jsonUser.emit_compact = false
print(jsonUser:emit())

rest:add_header("Content-Type", "application/json")

jsonUser.emit_compact = true
local responseBody = rest:full_request_string("POST", "/users", jsonUser:emit())
if not rest.last_method_success then
    print(rest.last_error_text)
    return
end

-- If the response status code did not indicate success, then see what happened..
if rest.response_status_code ~= 200 then
    print("Request Header: ")
    print(rest.last_request_header)
    print("----")
    print("Response StatusCode = " .. rest.response_status_code)
    print("Response StatusLine: " .. rest.response_status_text)
    print("Response Header:")
    print(rest.response_header)
    print(responseBody)
    return
end

local json = chilkat.JsonObject.new()
json.emit_compact = false
json:load(responseBody)
-- Show the full JSON response..
print(json:emit())

-- The success JSON looks like this:
-- {
--   "result": "success",
--   "users": [
--     {
--       "id": 984244,
--       "firstName": "Geoff",
--       "lastName": "Wirtz",
--       "companyName": "Sample Company",
--       "email": "gwirtz@example2.com",
--       "phone": "+12349282001",
--       "mobile": "+12349332744",
--       "hourlyRate": 0,
--       "active": 1,
--       "deleted": false,
--       "colour": "#000000",
--       "created": "2016-10-26T18:03:59+00:00",
--       "modified": "2016-10-26T18:03:59+00:00",
--       "isAssignable": true,
--       "avatarUrl": "https:\/\/www.geoop.com\/images\/mobithumb_984244.jpg",
--       "role": {
--         "id": 2
--       },
--       "account": {
--         "id": 39409
--       },
--       "status": {}
--     }
--   ],
--   "metadata": {
--     "receivedItemsCount": 1,
--     "validItems": [
--       0
--     ],
--     "invalidItems": [
--     ]
--   }
-- }
--