Xbase++

auth.fatturazioneelettronica.aruba.it GetToken

See more HTTP Misc Examples

Sample code to duplicate MSXML2.XMLHTTP.6.0 code to send a x-www-form-urlencoded POST. Xbase++

LOCAL nSuccess
LOCAL oHttp
LOCAL oReq
LOCAL oResp

nSuccess := 0

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

//  This example duplicates the following Microsoft FoxPro (XMLHTTP) code

//  Local loHttp As "MSXML2.XMLHTTP.6.0" && creazione oggetto per richieste HTTP
//  loHttp = Createobject("MSXML2.XMLHTTP.6.0")
//  
//  LOCAL luser, lpassword
//  luser = "myuser" 
//  lpassword = "mypwd" 
//  Local lEsito 
//  With loHttp As MSXML2.XMLHTTP.6.0
//  	.Open("POST", 'https://auth.fatturazioneelettronica.aruba.it/auth/signin' ,.F.) && URL del Cloud di Test da sostituire con quello di produzione
//  	.setRequestHeader("Content-Type","application/x-www-form-urlencoded;charset=UTF-8") 
//  	.setRequestHeader("Content-Length","53") 
//  	.Send("grant_type=password&username="+luser+"&password="+lpassword) && faccio la POST con le variabili
//  	Store .responsetext To lEsito && memorizzo la risposta del server
//  Endwith
//  
//  Public oConnessione_Aruba
//  oConnessione_Aruba = nfjsonread(lEsito)

oHttp := CreateObject("Chilkat.Http")
oReq := CreateObject("Chilkat.HttpRequest")

oReq:HttpVerb := "POST"
oReq:Path := "/auth/signin"
oReq:Charset := "utf-8"
oReq:ContentType := "application/x-www-form-urlencoded"

oReq:AddParam("grant_type", "password")
oReq:AddParam("username", "YourUsername")
oReq:AddParam("password", "YourPassword")

//  No need to set Content-Length because Chilkat always computes the actual content length and adds the header.

oResp := CreateObject("Chilkat.HttpResponse")
nSuccess := oHttp:HttpReq("https://auth.fatturazioneelettronica.aruba.it/auth/signin", oReq, oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oHttp:destroy()
    oReq:destroy()
    oResp:destroy()
    RETURN
ENDIF

? "Response Status: " + Str(oResp:StatusCode)
? "Response Body: "
? oResp:BodyStr

oHttp:destroy()
oReq:destroy()
oResp:destroy()