|
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) SOAP demoemision.thefactoryhka.com.pa DescargaPDFMake a SOAP call to http://demoemision.thefactoryhka.com.pa/ws/obj/v1.0/Service.svc with SOAPAction http://tempuri.org/IService/DescargaPDF
<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. ' -------------------------------------------------------------------------------- ' 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 = Server.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:tem="http://tempuri.org/" xmlns:ser="http://schemas.datacontract.org/2004/07/Services.Model"> ' <soapenv:Header/> ' <soapenv:Body> ' <tem:DescargaPDF> ' <tem:tokenEmpresa>?</tem:tokenEmpresa> ' <tem:tokenPassword>?</tem:tokenPassword> ' <tem:datosDocumento> ' <ser:codigoSucursalEmisor>?</ser:codigoSucursalEmisor> ' <ser:numeroDocumentoFiscal>?</ser:numeroDocumentoFiscal> ' <ser:puntoFacturacionFiscal>?</ser:puntoFacturacionFiscal> ' <ser:serialDispositivo>?</ser:serialDispositivo> ' <ser:tipoDocumento>?</ser:tipoDocumento> ' <ser:tipoEmision>?</ser:tipoEmision> ' </tem:datosDocumento> ' </tem:DescargaPDF> ' </soapenv:Body> ' </soapenv:Envelope> ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml") set xml = Server.CreateObject("Chilkat.Xml") xml.Tag = "soapenv:Envelope" success = xml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/") success = xml.AddAttribute("xmlns:tem","http://tempuri.org/") success = xml.AddAttribute("xmlns:ser","http://schemas.datacontract.org/2004/07/Services.Model") xml.UpdateChildContent "soapenv:Header","" xml.UpdateChildContent "soapenv:Body|tem:DescargaPDF|tem:tokenEmpresa","?" xml.UpdateChildContent "soapenv:Body|tem:DescargaPDF|tem:tokenPassword","?" xml.UpdateChildContent "soapenv:Body|tem:DescargaPDF|tem:datosDocumento|ser:codigoSucursalEmisor","?" xml.UpdateChildContent "soapenv:Body|tem:DescargaPDF|tem:datosDocumento|ser:numeroDocumentoFiscal","?" xml.UpdateChildContent "soapenv:Body|tem:DescargaPDF|tem:datosDocumento|ser:puntoFacturacionFiscal","?" xml.UpdateChildContent "soapenv:Body|tem:DescargaPDF|tem:datosDocumento|ser:serialDispositivo","?" xml.UpdateChildContent "soapenv:Body|tem:DescargaPDF|tem:datosDocumento|ser:tipoDocumento","?" xml.UpdateChildContent "soapenv:Body|tem:DescargaPDF|tem:datosDocumento|ser:tipoEmision","?" strXml = xml.GetXml() http.SetRequestHeader "SOAPAction","http://tempuri.org/IService/DescargaPDF" http.SetRequestHeader "Content-Type","text/xml; charset=utf-8" endPoint = "http://demoemision.thefactoryhka.com.pa/ws/obj/v1.0/Service.svc" ' resp is a Chilkat.HttpResponse Set resp = http.PostXml(endPoint,strXml,"utf-8") If (http.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>" Response.End End If statusCode = resp.StatusCode If (statusCode <> 200) Then Response.Write "<pre>" & Server.HTMLEncode( "Non-success status code: " & statusCode) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Response header: " & resp.Header) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Response body: " & resp.BodyStr) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Unsuccessful.") & "</pre>" Response.End End If ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml") set xmlResp = Server.CreateObject("Chilkat.Xml") success = xmlResp.LoadXml(resp.BodyStr) Response.Write "<pre>" & Server.HTMLEncode( xmlResp.GetXml()) & "</pre>" ' Use this online tool to generate parsing code from sample XML: ' Generate Parsing Code from XML %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.