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
(VB.NET) Shopify Retrieve the item's inventory levelsAfter you have the inventory item ID, you can use it with the InventoryLevel resource to find the levels and locations for the inventory item: For more information, see https://shopify.dev/tutorials/manage-product-inventory-with-admin-api#retrieve-the-inventory-levels-for-a-product-variant
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim http As New Chilkat.Http http.Login = "SHOPIFY_PRIVATE_API_KEY" http.Password = "SHOPIFY_PRIVATE_API_KEY" http.Accept = "application/json" ' How to get the inventory item ID Dim resp As Chilkat.HttpResponse = http.QuickRequest("GET","https://{shop}.myshopify.com/admin/api/2020-04/inventory_levels.json?inventory_item_ids={inventory_item_id}") If (http.LastMethodSuccess <> True) Then Debug.WriteLine(http.LastErrorText) Exit Sub End If Debug.WriteLine("Response Status Code: " & resp.StatusCode) Dim jsonResponse As New Chilkat.JsonObject jsonResponse.Load(resp.BodyStr) jsonResponse.EmitCompact = False Debug.WriteLine(jsonResponse.Emit()) If (resp.StatusCode <> 200) Then Debug.WriteLine("Failed.") Exit Sub End If ' Sample output... ' (See the parsing code below..) ' ' Use the this online tool to generate parsing code from sample JSON: ' Generate Parsing Code from JSON ' { ' "inventory_levels": [ ' { ' "inventory_item_id": 12250274365496, ' "location_id": 6884556842, ' "available": 8, ' "updated_at": "2018-06-18T11:49:50-04:00", ' "admin_graphql_api_id": "gid://shopify/InventoryLevel/6485147690?inventory_item_id=12250274365496" ' }, ' { ' "inventory_item_id": 12250274365496, ' "location_id": 13968834616, ' "available": 50, ' "updated_at": "2018-06-26T14:44:30-04:00", ' "admin_graphql_api_id": "gid://shopify/InventoryLevel/13570506808?inventory_item_id=12250274365496" ' }, ' { ' "inventory_item_id": 12250274365496, ' "location_id": 13968867384, ' "available": 100, ' "updated_at": "2018-06-26T14:44:30-04:00", ' "admin_graphql_api_id": "gid://shopify/InventoryLevel/13570539576?inventory_item_id=12250274365496" ' } ' ] ' } ' Dim inventory_item_id As Integer Dim location_id As Integer Dim available As Integer Dim updated_at As String Dim admin_graphql_api_id As String Dim i As Integer = 0 Dim count_i As Integer = jsonResponse.SizeOfArray("inventory_levels") While i < count_i jsonResponse.I = i inventory_item_id = jsonResponse.IntOf("inventory_levels[i].inventory_item_id") location_id = jsonResponse.IntOf("inventory_levels[i].location_id") available = jsonResponse.IntOf("inventory_levels[i].available") updated_at = jsonResponse.StringOf("inventory_levels[i].updated_at") admin_graphql_api_id = jsonResponse.StringOf("inventory_levels[i].admin_graphql_api_id") i = i + 1 End While |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.