Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(VB.NET UWP/WinRT) 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 = Await http.QuickRequestAsync("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-2022 Chilkat Software, Inc. All Rights Reserved.