Lianja

qa.factura1.com.co Obtain Auth Token

See more HTTP Misc Examples

Demonstrates how to send a JSON POST to get an authenticataion token for qa.factura1.com.co Lianja

llSuccess = .F.

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

loHttp = createobject("CkHttp")

// Build the following JSON
// {
//   "password": "MY_PASSWORD",
//   "username": "MY_USERNAME"
// }

loJson = createobject("CkJsonObject")
loJson.EmitCompact = .F.
loJson.UpdateString("password","MY_PASSWORD")
loJson.UpdateString("username","MY_USERNAME")

loResp = createobject("CkHttpResponse")
llSuccess = loHttp.HttpJson("POST","https://qa.factura1.com.co/v2/auth",loJson,"application/json",loResp)
if (llSuccess = .F.) then
    ? loHttp.LastErrorText
    release loHttp
    release loJson
    release loResp
    return
endif

loJsonResp = createobject("CkJsonObject")
loJsonResp.EmitCompact = .F.
loJsonResp.Load(loResp.BodyStr)

? loJsonResp.Emit()

? "Access token: " + loJsonResp.StringOf("token")


release loHttp
release loJson
release loResp
release loJsonResp