(AutoIt) Test Salesforce OAuth2 Access Token

See more Salesforce Examples

Demonstrates how to make a simple Salesforce REST API call to test a previously obtained access token.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

; This example does the following:

; curl -X GET https://yourInstance.salesforce.com/services/oauth2/userinfo \
;      -H "Authorization: Bearer YOUR_ACCESS_TOKEN"

$oHttp = ObjCreate("Chilkat.Http")

; Use the following online tool to generate HTTP code from a CURL command
; Convert a cURL Command to HTTP Source Code

; This example assumes the OAuth2 access token was previously fetched 
; and saved to a file.  See Get SalesForce OAuth2 Access Token via Authorization Flow

$oJson = ObjCreate("Chilkat.JsonObject")
Local $bSuccess = $oJson.LoadFile("qa_data/tokens/_salesforce.json")
If ($bSuccess = False) Then
    ConsoleWrite("Failed to load OAuth2 access token." & @CRLF)
    Exit
EndIf

; Here's an example of the JSON:

; {
;   "access_token": "00D41000....uLZBpT6",
;   "refresh_token": "5Aep....25xdGgkrV",
;   "signature": "cjTbSc5DvcKpaMoRTzuQTJLb1tcMw8LEO01flq4aMD4=",
;   "scope": "refresh_token id",
;   "instance_url": "https://d41000000f8a0eak-dev-ed.my.salesforce.com",
;   "id": "https://login.salesforce.com/id/00D41000000F8A0EAK/005410000....xAAE",
;   "token_type": "Bearer",
;   "issued_at": "1738348388166"
; }

; Adds the "Authorization: Bearer YOUR_ACCESS_TOKEN" header.
$oHttp.AuthToken = $oJson.StringOf("access_token")

; We want to build the following URL:  https://<instance_id>.salesforce.com/services/oauth2/userinfo
$oSbUrl = ObjCreate("Chilkat.StringBuilder")
$oSbUrl.Append($oJson.StringOf("instance_url"))
$oSbUrl.Append("/services/oauth2/userinfo")

$oSbResponseBody = ObjCreate("Chilkat.StringBuilder")
$bSuccess = $oHttp.QuickGetSb($oSbUrl.GetAsString(),$oSbResponseBody)
If ($bSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Response status code = " & $oHttp.LastStatus & @CRLF)

$oJsonResponse = ObjCreate("Chilkat.JsonObject")
$oJsonResponse.LoadSb($oSbResponseBody)
$oJsonResponse.EmitCompact = False
ConsoleWrite($oJsonResponse.Emit() & @CRLF)

; The expected JSON response is something like this:

; {
;   "sub": "005xxxxxxxxxxxx",
;   "name": "John Doe",
;   "preferred_username": "johndoe@example.com",
;   "email": "johndoe@example.com",
;   "profile": "https://na85.salesforce.com/005xxxxxxxxxxxx"
; ...
; ...
; }