|
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) Peoplevox SaveDataDemonstrates how to call the Peoplevox SaveData SOAP method. This example adds a new carrier (DHL) to the system.
<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. ' Sends a POST that looks like this: ' POST /PEOPLEVOX_CLIENT_ID/resources/integrationservicev4.asmx HTTP/1.1 ' Content-Type: text/xml;charset=UTF-8 ' SOAPAction: http://www.peoplevox.net/SaveData ' Content-Length: (automatically computed and added by Chilkat) ' Host: qac.peoplevox.net ' ' <soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:peop="http://www.peoplevox.net/"> ' <soap:Header> ' <peop:UserSessionCredentials> ' <peop:UserId>PEOPLEVOX_USER_ID</peop:UserId> ' <peop:ClientId>PEOPLEVOX_CLIENT_ID</peop:ClientId> ' <peop:SessionId>PEOPLEVOX_SESSION_ID</peop:SessionId> ' </peop:UserSessionCredentials> ' </soap:Header> ' <soap:Body> ' <peop:SaveData> ' <peop:saveRequest> ' <peop:TemplateName>Carriers</peop:TemplateName> ' <peop:CsvData>CSV_DATA</peop:CsvData> ' <peop:Action>0</peop:Action> ' </peop:saveRequest> ' </peop:SaveData> ' </soap:Body> ' </soap:Envelope> ' ' Notice that a UserId is needed here. This is different than the username required for Peoplevox authentication. ' The UserId for the admin account is 1. ' ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder") set sbSoapXml = Server.CreateObject("Chilkat.StringBuilder") success = sbSoapXml.Append("<?xml version=""1.0"" encoding=""utf-8""?>" & vbCrLf) success = sbSoapXml.Append("<soap:Envelope xmlns:soap=""http://www.w3.org/2003/05/soap-envelope"" xmlns:peop=""http://www.peoplevox.net/"">" & vbCrLf) success = sbSoapXml.Append(" <soap:Header>" & vbCrLf) success = sbSoapXml.Append(" <peop:UserSessionCredentials>" & vbCrLf) success = sbSoapXml.Append(" <peop:UserId>PEOPLEVOX_USER_ID</peop:UserId>" & vbCrLf) success = sbSoapXml.Append(" <peop:ClientId>PEOPLEVOX_CLIENT_ID</peop:ClientId>" & vbCrLf) success = sbSoapXml.Append(" <peop:SessionId>PEOPLEVOX_SESSION_ID</peop:SessionId>" & vbCrLf) success = sbSoapXml.Append(" </peop:UserSessionCredentials>" & vbCrLf) success = sbSoapXml.Append(" </soap:Header>" & vbCrLf) success = sbSoapXml.Append(" <soap:Body>" & vbCrLf) success = sbSoapXml.Append(" <peop:SaveData>" & vbCrLf) success = sbSoapXml.Append(" <peop:saveRequest>" & vbCrLf) success = sbSoapXml.Append(" <peop:TemplateName>Carriers</peop:TemplateName>" & vbCrLf) success = sbSoapXml.Append(" <peop:CsvData>CSV_DATA</peop:CsvData>" & vbCrLf) success = sbSoapXml.Append(" <peop:Action>0</peop:Action>" & vbCrLf) success = sbSoapXml.Append(" </peop:saveRequest>" & vbCrLf) success = sbSoapXml.Append(" </peop:SaveData>" & vbCrLf) success = sbSoapXml.Append(" </soap:Body>" & vbCrLf) success = sbSoapXml.Append("</soap:Envelope>") ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder") set sbCsvData = Server.CreateObject("Chilkat.StringBuilder") success = sbCsvData.Append("Name,Reference" & vbCrLf) success = sbCsvData.Append("DHL,D0001") numReplacements = sbSoapXml.Replace("CSV_DATA",sbCsvData.GetAsString()) ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.HttpRequest") set req = Server.CreateObject("Chilkat.HttpRequest") req.HttpVerb = "POST" req.SendCharset = 1 req.Charset = "utf-8" req.AddHeader "Content-Type","text/xml" req.AddHeader "SOAPAction","http://www.peoplevox.net/SaveData" req.Path = "/PEOPLEVOX_CLIENT_ID/resources/integrationservicev4.asmx" success = req.LoadBodyFromString(sbSoapXml.GetAsString(),"utf-8") ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http") set http = Server.CreateObject("Chilkat.Http") http.FollowRedirects = 1 ' resp is a Chilkat.HttpResponse Set resp = http.SynchronousRequest("qac.peoplevox.net",443,1,req) If (http.LastMethodSuccess <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>" Response.End End If ' We should expect a 200 response if successful. If (resp.StatusCode <> 200) Then Response.Write "<pre>" & Server.HTMLEncode( "Response StatusCode = " & resp.StatusCode) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Response StatusLine: " & resp.StatusLine) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "Response Header:") & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( resp.Header) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( resp.BodyStr) & "</pre>" Response.End End If ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xml") set xmlResponse = Server.CreateObject("Chilkat.Xml") success = xmlResponse.LoadXml(resp.BodyStr) Response.Write "<pre>" & Server.HTMLEncode( xmlResponse.GetXml()) & "</pre>" ' A successful response is shown below. ' To parse a successful response: reference = xmlResponse.ChilkatPath("soap:Body|SaveDataResponse|SaveDataResult|Statuses|IntegrationStatusResponse|Reference|*") Response.Write "<pre>" & Server.HTMLEncode( "Reference = " & reference) & "</pre>" status = xmlResponse.ChilkatPath("soap:Body|SaveDataResponse|SaveDataResult|Statuses|IntegrationStatusResponse|Status|*") Response.Write "<pre>" & Server.HTMLEncode( "Status = " & status) & "</pre>" ' <?xml version="1.0" encoding="utf-8" ?> ' <soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"> ' <soap:Body> ' <SaveDataResponse xmlns="http://www.peoplevox.net/"> ' <SaveDataResult> ' <ResponseId>0</ResponseId> ' <TotalCount>1</TotalCount> ' <Detail /> ' <Statuses> ' <IntegrationStatusResponse> ' <Reference>D0001</Reference> ' <Status>Success</Status> ' <LineNo>0</LineNo> ' </IntegrationStatusResponse> ' </Statuses> ' <ImportingQueueId>0</ImportingQueueId> ' <SalesOrdersToDespatchIds /> ' </SaveDataResult> ' </SaveDataResponse> ' </soap:Body> ' </soap:Envelope> %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.