Lua
Lua
GeoOp - Create a New User
See more GeoOp Examples
Create a new GeoOp user.Chilkat Lua Downloads
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": [
-- ]
-- }
-- }
--