Chilkat Online Tools

VB6 / PrestaShop Webservice Demo Resource / Create article

Back to Collection Items

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim http As New ChilkatHttp
Dim success As Long

http.BasicAuth = 1
http.Login = "{{webservice_key}}"
http.Password = "password"

' Use this online tool to generate code from sample XML: Generate Code to Create XML

' The following XML is sent in the request body.

' <?xml version="1.0" encoding="UTF-8"?>
' <prestashop xmlns:xlink="http://www.w3.org/1999/xlink">
'     <article>
'         <title>
'             <language id="1"><![CDATA[My title in english]]></language>
'             <language id="2"><![CDATA[Mon titre en français]]></language>
'         </title>
'         <type><![CDATA[Blog post]]></type>
'     </article>
' </prestashop>
' 

Dim xml As New ChilkatXml
xml.Tag = "prestashop"
success = xml.AddAttribute("xmlns:xlink","http://www.w3.org/1999/xlink")
success = xml.UpdateAttrAt("article|title|language",1,"id","1")
xml.UpdateChildContent "article|title|language","My title in english"
success = xml.UpdateAttrAt("article|title|language[1]",1,"id","2")
xml.UpdateChildContent "article|title|language[1]","Mon titre en français"
xml.UpdateChildContent "article|type","Blog post"

Dim sbRequestBody As New ChilkatStringBuilder
success = xml.GetXmlSb(sbRequestBody)

Dim resp As ChilkatHttpResponse
Set resp = http.PTextSb("POST","https://localhost:8080/api/articles",sbRequestBody,"utf-8","application/xml",0,0)
If (http.LastMethodSuccess = 0) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

Debug.Print resp.StatusCode
Debug.Print resp.BodyStr

Curl Command

curl -X POST
	-u '{{webservice_key}}:password'
	-d '<?xml version="1.0" encoding="UTF-8"?>
<prestashop xmlns:xlink="http://www.w3.org/1999/xlink">
    <article>
        <title>
            <language id="1">
                <![CDATA[My title in english]]>
            </language>
            <language id="2">
                <![CDATA[Mon titre en français]]>
            </language>
        </title>
        <type>
            <![CDATA[Blog post]]>
        </type>
    </article>
</prestashop>'
https://localhost:8080/api/articles

Postman Collection Item JSON

{
  "name": "Create article",
  "request": {
    "method": "POST",
    "header": [
    ],
    "body": {
      "mode": "raw",
      "raw": "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<prestashop xmlns:xlink=\"http://www.w3.org/1999/xlink\">\n    <article>\n        <title>\n            <language id=\"1\">\n                <![CDATA[My title in english]]>\n            </language>\n            <language id=\"2\">\n                <![CDATA[Mon titre en français]]>\n            </language>\n        </title>\n        <type>\n            <![CDATA[Blog post]]>\n        </type>\n    </article>\n</prestashop>",
      "options": {
        "raw": {
          "language": "xml"
        }
      }
    },
    "url": {
      "raw": "{{webservice_url}}/api/articles",
      "host": [
        "{{webservice_url}}"
      ],
      "path": [
        "api",
        "articles"
      ]
    }
  },
  "response": [
  ]
}