(Xojo Plugin) Shopify Delete Product
Delete a product from the shop.
Dim rest As New Chilkat.Rest
Dim success As Boolean
success = rest.SetAuthBasic("SHOPIFY_PRIVATE_API_KEY","SHOPIFY_PRIVATE_API_SECRET_KEY")
success = rest.Connect("chilkat.myshopify.com",443,True,True)
If (success <> True) Then
System.DebugLog(rest.LastErrorText)
Return
End If
Dim sbResponse As New Chilkat.StringBuilder
success = rest.FullRequestNoBodySb("DELETE","/admin/products/#{id}.json",sbResponse)
If (success <> True) Then
System.DebugLog(rest.LastErrorText)
Return
End If
If (rest.ResponseStatusCode <> 200) Then
System.DebugLog("Received error response code: " + Str(rest.ResponseStatusCode))
System.DebugLog("Response body:")
System.DebugLog(sbResponse.GetAsString())
Return
End If
System.DebugLog("Example Completed.")
|