![]() |
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
(Visual FoxPro) effectconnect Read OrderlistGet a set of orders filtered by the parameters in the XML payload. Note: This example requires Chilkat v11.0.0 or greater.
LOCAL lnSuccess LOCAL lcFullUri LOCAL lcUri LOCAL lcApiVersion LOCAL loHttp LOCAL loDt LOCAL lcTimestamp LOCAL loXml LOCAL loSbXml LOCAL loSbStringToSign LOCAL loCrypt LOCAL loResp LOCAL loXmlResp lnSuccess = 0 * This example assumes the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. lcFullUri = "https://submit.effectconnect.com/orderlist" lcUri = "/orderlist" lcApiVersion = "2.0" loHttp = CreateObject('Chilkat.Http') * Use your effectconnect public key here.. loHttp.SetRequestHeader("KEY","PUBLIC_KEY") loHttp.SetRequestHeader("VERSION",lcApiVersion) loHttp.SetRequestHeader("URI",lcUri) loHttp.SetRequestHeader("RESPONSETYPE","XML") loHttp.SetRequestHeader("RESPONSELANGUAGE","en") * Get the current date/time in timestamp format. loDt = CreateObject('Chilkat.CkDateTime') loDt.SetFromCurrentSystemTime() lcTimestamp = loDt.GetAsTimestamp(1) loHttp.SetRequestHeader("TIME",lcTimestamp) ? "timestamp = " + lcTimestamp * Create the following XML request body: * <?xml version="1.0" encoding="utf-8"?> * <list> * <filters> * <fromDateFilter> * <filterValue>2018-09-14T12:12:12+01:00</filterValue> * </fromDateFilter> * <toDateFilter> * <filterValue>2019-04-13T23:59:59+01:00</filterValue> * </toDateFilter> * <hasStatusFilter> * <filterValue>paid</filterValue> * </hasStatusFilter> * <hasTagFilter> * <filterValue> * <tagName>Test</tagName> * <exclude>false</exclude> * </filterValue> * </hasTagFilter> * </filters> * </list> * Use this online tool to generate the code from sample XML: * Generate Code to Create XML loXml = CreateObject('Chilkat.Xml') loXml.Tag = "list" loXml.UpdateChildContent("filters|fromDateFilter|filterValue","2018-09-14T12:12:12+01:00") loXml.UpdateChildContent("filters|toDateFilter|filterValue","2019-04-13T23:59:59+01:00") loXml.UpdateChildContent("filters|hasStatusFilter|filterValue","paid") loXml.UpdateChildContent("filters|hasTagFilter|filterValue|tagName","Test") loXml.UpdateChildContent("filters|hasTagFilter|filterValue|exclude","false") loXml.EmitCompact = 1 loSbXml = CreateObject('Chilkat.StringBuilder') loXml.GetXmlSb(loSbXml) * Build a string-to-sign and sign it using our effectconnect private key loSbStringToSign = CreateObject('Chilkat.StringBuilder') loSbStringToSign.AppendInt(loSbXml.Length) loSbStringToSign.Append("POST") loSbStringToSign.Append(lcUri) loSbStringToSign.Append(lcApiVersion) loSbStringToSign.Append(lcTimestamp) loCrypt = CreateObject('Chilkat.Crypt2') loCrypt.MacAlgorithm = "hmac" loCrypt.HashAlgorithm = "sha512" loCrypt.EncodingMode = "base64" * Use your effectconnect private key here: loCrypt.SetMacKeyString("PRIVATE_KEY") loHttp.SetRequestHeader("SIGNATURE",loCrypt.MacStringENC(loSbStringToSign.GetAsString())) * Send the POST.. loResp = CreateObject('Chilkat.HttpResponse') lnSuccess = loHttp.HttpStr("POST",lcFullUri,loXml.GetXml(),"utf-8","application/xml",loResp) IF (lnSuccess = 0) THEN ? loHttp.LastErrorText RELEASE loHttp RELEASE loDt RELEASE loXml RELEASE loSbXml RELEASE loSbStringToSign RELEASE loCrypt RELEASE loResp CANCEL ENDIF ? "response status code = " + STR(loResp.StatusCode) * Examine the response. The response status code can be 200 for both errors and success. * The success or error is based on the XML returned in the response body. loXmlResp = CreateObject('Chilkat.Xml') loXmlResp.LoadXml(loResp.BodyStr) ? "response body:" ? loXmlResp.GetXml() * Remove previously set headers (unless we want the same headers for the next request, * in which case we may remove or update individual headers by calling SetRequestHeader. loHttp.ClearHeaders() RELEASE loHttp RELEASE loDt RELEASE loXml RELEASE loSbXml RELEASE loSbStringToSign RELEASE loCrypt RELEASE loResp RELEASE loXmlResp |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.