![]() |
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) Shopware 6 - Create CategorySee more Shopware 6 ExamplesCreate a new category.Note: This example requires Chilkat v11.0.0 or greater.
LOCAL lnSuccess LOCAL loHttp LOCAL loJson LOCAL loJsonToken LOCAL loResp LOCAL loSbResponseBody LOCAL loJResp LOCAL lnRespStatusCode lnSuccess = 0 * This example assumes the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. loHttp = CreateObject('Chilkat.Http') * Sends the following POST * POST /api/v3/category * { * "name": "Test123" * } * Create a category named "Test123" loJson = CreateObject('Chilkat.JsonObject') loJson.UpdateString("name","Test123") * Load the access token previously obtained in Shopware 6 OAuth2 Client Credentials loJsonToken = CreateObject('Chilkat.JsonObject') loJsonToken.LoadFile("qa_data/tokens/shopware6.json") * This causes the "Authorization: Bearer <access_token>" header to be added. loHttp.AuthToken = loJsonToken.StringOf("access_token") loResp = CreateObject('Chilkat.HttpResponse') lnSuccess = loHttp.HttpJson("POST","https://my-shopware-6-shop.de/api/v3/category",loJson,"application/json",loResp) IF (lnSuccess = 0) THEN ? loHttp.LastErrorText RELEASE loHttp RELEASE loJson RELEASE loJsonToken RELEASE loResp CANCEL ENDIF loSbResponseBody = CreateObject('Chilkat.StringBuilder') loResp.GetBodySb(loSbResponseBody) loJResp = CreateObject('Chilkat.JsonObject') loJResp.LoadSb(loSbResponseBody) loJResp.EmitCompact = 0 * A successful response is a 204 response status code with an empty response body. ? "Response Body:" ? loJResp.Emit() * If we get a 401 response, it may be that our access token expired and we need to fetch a new one. lnRespStatusCode = loResp.StatusCode ? "Response Status Code = " + STR(lnRespStatusCode) IF (lnRespStatusCode >= 400) THEN ? "Response Header:" ? loResp.Header ? "Failed." RELEASE loHttp RELEASE loJson RELEASE loJsonToken RELEASE loResp RELEASE loSbResponseBody RELEASE loJResp CANCEL ENDIF RELEASE loHttp RELEASE loJson RELEASE loJsonToken RELEASE loResp RELEASE loSbResponseBody RELEASE loJResp |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.