Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PowerBuilder) WhatsApp - First LoginLog in the very first time to get your authentication token. The new login/password is passed in the JSON body of the request. For more information, see https://developers.facebook.com/docs/whatsapp/api/users/login
integer li_rc oleobject loo_Http integer li_Success oleobject loo_Json oleobject loo_Resp oleobject loo_SbResponseBody oleobject loo_JResp integer li_RespStatusCode string ls_Token string ls_Expires_after integer i integer li_Count_i // This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. loo_Http = create oleobject li_rc = loo_Http.ConnectToNewObject("Chilkat_9_5_0.Http") if li_rc < 0 then destroy loo_Http MessageBox("Error","Connecting to COM object failed") return end if // Implements the following CURL command: // curl -k -X POST https://your-webapp-hostname:your-webapp-port/v1/users/login \ // -H 'Content-Type: application/json' \ // --user 'admin:secret' \ // -d '{"new_password" : "new-password"}' loo_Http.Login = "admin" loo_Http.Password = "secret" // The following JSON is sent in the request body. // { // "new_password": "new-password" // } loo_Json = create oleobject li_rc = loo_Json.ConnectToNewObject("Chilkat_9_5_0.JsonObject") loo_Json.UpdateString("new_password","new-password") loo_Http.SetRequestHeader("Content-Type","application/json") loo_Resp = loo_Http.PostJson3("https://your-webapp-hostname:your-webapp-port/v1/users/login","application/json",loo_Json) if loo_Http.LastMethodSuccess = 0 then Write-Debug loo_Http.LastErrorText destroy loo_Http destroy loo_Json return end if loo_SbResponseBody = create oleobject li_rc = loo_SbResponseBody.ConnectToNewObject("Chilkat_9_5_0.StringBuilder") loo_Resp.GetBodySb(loo_SbResponseBody) loo_JResp = create oleobject li_rc = loo_JResp.ConnectToNewObject("Chilkat_9_5_0.JsonObject") loo_JResp.LoadSb(loo_SbResponseBody) loo_JResp.EmitCompact = 0 Write-Debug "Response Body:" Write-Debug loo_JResp.Emit() li_RespStatusCode = loo_Resp.StatusCode Write-Debug "Response Status Code = " + string(li_RespStatusCode) if li_RespStatusCode >= 400 then Write-Debug "Response Header:" Write-Debug loo_Resp.Header Write-Debug "Failed." destroy loo_Resp destroy loo_Http destroy loo_Json destroy loo_SbResponseBody destroy loo_JResp return end if destroy loo_Resp // Sample JSON response: // (Sample code for parsing the JSON response is shown below) // { // "users": [ // { // "token": "eyJhbGciOHlXVCJ9.eyJ1c2VyIjoNTIzMDE2Nn0.mEoF0COaO00Z1cANo", // "expires_after": "2018-03-01 15:29:26+00:00" // } // ] // } // Sample code for parsing the JSON response... i = 0 li_Count_i = loo_JResp.SizeOfArray("users") do while i < li_Count_i loo_JResp.I = i ls_Token = loo_JResp.StringOf("users[i].token") ls_Expires_after = loo_JResp.StringOf("users[i].expires_after") i = i + 1 loop destroy loo_Http destroy loo_Json destroy loo_SbResponseBody destroy loo_JResp |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.