Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(VBScript) SOAP facturacion.finkok.com Stamp RequestMake a SOAP call to https://demo-facturacion.finkok.com/servicios/soap/stamp
Dim fso, outFile Set fso = CreateObject("Scripting.FileSystemObject") 'Create a Unicode (utf-16) output text file. Set outFile = fso.CreateTextFile("output.txt", True, True) ' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' -------------------------------------------------------------------------------- ' Also see Chilkat's Online WSDL Code Generator ' to generate code and SOAP Request and Response XML for each operation in a WSDL. ' -------------------------------------------------------------------------------- ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http") set http = CreateObject("Chilkat.Http") ' First build this SOAP XML request body: ' Use this online tool to generate the code from sample XML: ' Generate Code to Create XML ' <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:stam="http://facturacion.finkok.com/stamp"> ' <soapenv:Header/> ' <soapenv:Body> ' <stam:stamp> ' <stam:xml>cid:20379537153</stam:xml> ' <stam:username>?</stam:username> ' <stam:password>?</stam:password> ' </stam:stamp> ' </soapenv:Body> ' </soapenv:Envelope> ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml") set xml = CreateObject("Chilkat.Xml") xml.Tag = "soapenv:Envelope" success = xml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/") success = xml.AddAttribute("xmlns:stam","http://facturacion.finkok.com/stamp") xml.UpdateChildContent "soapenv:Header","" xml.UpdateChildContent "soapenv:Body|stam:stamp|stam:xml","cid:20379537153" xml.UpdateChildContent "soapenv:Body|stam:stamp|stam:username","MY_USERNAME" xml.UpdateChildContent "soapenv:Body|stam:stamp|stam:password","MY_PASSWORD" strXml = xml.GetXml() http.SetRequestHeader "SOAPAction","stamp" http.SetRequestHeader "Content-Type","text/xml; charset=utf-8" endPoint = "https://demo-facturacion.finkok.com/servicios/soap/stamp" ' resp is a Chilkat.HttpResponse Set resp = http.PostXml(endPoint,strXml,"utf-8") If (http.LastMethodSuccess <> 1) Then outFile.WriteLine(http.LastErrorText) WScript.Quit End If statusCode = resp.StatusCode If (statusCode <> 200) Then outFile.WriteLine("Non-success status code: " & statusCode) outFile.WriteLine("Response header: " & resp.Header) outFile.WriteLine("Response body: " & resp.BodyStr) outFile.WriteLine("Unsuccessful.") WScript.Quit End If ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml") set xmlResp = CreateObject("Chilkat.Xml") success = xmlResp.LoadXml(resp.BodyStr) outFile.WriteLine(xmlResp.GetXml()) ' Use this online tool to generate parsing code from sample XML: ' Generate Parsing Code from XML outFile.Close |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.