Excel Fatturazione Elettronica Aruba IT: Refresh Access Token

Back to Index

Il token può essere rinnovato attraverso una richiesta di refresh che richiede i seguenti parametri in formato application/x-www-form-urlencoded con encoding UTF-8.

Documentation: https://fatturazioneelettronica.aruba.it/apidoc/docs.html#_refresh

CURL Command

curl -X POST  https://auth.fatturazioneelettronica.aruba.it/auth/signin \
-H 'Content-Type: application/x-www-form-urlencoded;charset=UTF-8' \
-d 'grant_type=refresh_token' \
-d 'refresh_token=262ac1f88ad1e9e5'

Excel Example

Dim rest As Chilkat.Rest
Set rest = Chilkat.NewRest

'  URL: https://auth.fatturazioneelettronica.aruba.it/auth/signin

bTls = True

port = 443

bAutoReconnect = True
success = rest.Connect("auth.fatturazioneelettronica.aruba.it",port,bTls,bAutoReconnect)
If (success <> True) Then
    Debug.Print "ConnectFailReason: "; rest.ConnectFailReason
    Debug.Print rest.LastErrorText
    Exit Sub
End If

success = rest.AddQueryParam("grant_type","refresh_token")
success = rest.AddQueryParam("refresh_token","262ac1f88ad1e9e5")


strResponseBody = rest.FullRequestFormUrlEncoded("POST","/auth/signin")
If (rest.LastMethodSuccess <> True) Then
    Debug.Print rest.LastErrorText
    Exit Sub
End If


respStatusCode = rest.ResponseStatusCode
If (respStatusCode >= 400) Then
    Debug.Print "Response Status Code = "; respStatusCode
    Debug.Print "Response Header:"
    Debug.Print rest.ResponseHeader
    Debug.Print "Response Body:"
    Debug.Print strResponseBody
    Exit Sub
End If

Dim jsonResponse As Chilkat.JsonObject
Set jsonResponse = Chilkat.NewJsonObject
success = jsonResponse.Load(strResponseBody)

'  See the Online Tool for Generating JSON Parse Code

access_token = jsonResponse.StringOf("access_token")
token_type = jsonResponse.StringOf("token_type")
expires_in = jsonResponse.IntOf("expires_in")
refresh_token = jsonResponse.StringOf("refresh_token")
client_id = jsonResponse.StringOf("client_id")
userName = jsonResponse.StringOf("userName")
Issued = jsonResponse.StringOf(""".issued""")
Expires = jsonResponse.StringOf(""".expires""")

Sample JSON Response Body

{
  "access_token": "571a08cd6275e81e",
  "token_type": "bearer",
  "expires_in": 1800,
  "refresh_token": "111ac1f88ad1efff",
  "client_id": "123456",
  "userName": "Utente",
  ".issued": "Mon, 21 Jan 2019 16:36:17 GMT",
  ".expires": "Mon, 21 Jan 2019 17:06:17 GMT"
}