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
(Classic ASP) auth.fatturazioneelettronica.aruba.it GetTokenSample code to duplicate MSXML2.XMLHTTP.6.0 code to send a x-www-form-urlencoded POST.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' 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) ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http") set http = Server.CreateObject("Chilkat.Http") ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.HttpRequest") set req = Server.CreateObject("Chilkat.HttpRequest") req.HttpVerb = "POST" req.Path = "/auth/signin" req.Charset = "utf-8" req.ContentType = "application/x-www-form-urlencoded" req.AddParam "grant_type","password" req.AddParam "username","YourUsername" req.AddParam "password","YourPassword" ' No need to set Content-Length because Chilkat always computes the actual content length and adds the header. ' resp is a Chilkat.HttpResponse Set resp = http.PostUrlEncoded("https://auth.fatturazioneelettronica.aruba.it/auth/signin",req) If (http.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>" Response.End End If Response.Write "<pre>" & Server.HTMLEncode( "Response Status: " & resp.StatusCode) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Response Body: ") & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( resp.BodyStr) & "</pre>" %> </body> </html> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.