(AutoIt) eBay -- Create or Replace Inventory Item (2nd example)

Another example for creating an inventory item, with different data.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

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

; This example sends the following sample PUT request to create (or replace) a new inventory item.

; { 
;     "product": { 
;         "title": "Test listing - do not bid or buy - awesome Apple watch test 2",
;         "aspects": { 
;             "Feature" : ["Water resistance", "GPS"],
;             "CPU" : ["Dual-Core Processor"]
;         },
;         "description": "Test listing - do not bid or buy \n Built-in GPS. Water resistance to 50 meters.1 A new lightning-fast dual-core processor. And a display that\u2019s two times brighter than before. Full of features that help you stay active, motivated, and connected, Apple Watch Series 2 is designed for all the ways you move ",
;         "upc": ["888462079525"],
;         "imageUrls": [
;             "http://store.storeimages.cdn-apple.com/4973/as-images.apple.com/is/image/AppleInc/aos/published/images/S/1/S1/42/S1-42-alu-silver-sport-white-grid?wid=332&hei=392&fmt=jpeg&qlt=95&op_sharpen=0&resMode=bicub&op_usm=0.5,0.5,0,0&iccEmbed=0&layer=comp&.v=1472247758975",
;             "http://store.storeimages.cdn-apple.com/4973/as-images.apple.com/is/image/AppleInc/aos/published/images/4/2/42/stainless/42-stainless-sport-white-grid?wid=332&hei=392&fmt=jpeg&qlt=95&op_sharpen=0&resMode=bicub&op_usm=0.5,0.5,0,0&iccEmbed=0&layer=comp&.v=1472247760390",
;             "http://store.storeimages.cdn-apple.com/4973/as-images.apple.com/is/image/AppleInc/aos/published/images/4/2/42/ceramic/42-ceramic-sport-cloud-grid?wid=332&hei=392&fmt=jpeg&qlt=95&op_sharpen=0&resMode=bicub&op_usm=0.5,0.5,0,0&iccEmbed=0&layer=comp&.v=1472247758007"
;         ]
;     },
;     "condition": "NEW",
;     "packageWeightAndSize": { 
;         "dimensions": { 
;             "height": 5,
;             "length": 10,
;             "width": 15,
;             "unit": "INCH"
;         },
;         "packageType": "MAILING_BOX",
;         "weight": { 
;             "value": 2,
;             "unit": "POUND"
;         }
;     },
;     "availability": { 
;         "shipToLocationAvailability": { 
;             "quantity": 10
;         }
;     }
; }

; First, generate the JSON using this code:
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.EmitCompact = False

$oJson.UpdateString("product.title","Test listing - do not bid or buy - awesome Apple watch test 2")
$oJson.UpdateString("product.aspects.Feature[0]","Water resistance")
$oJson.UpdateString("product.aspects.Feature[1]","GPS")
$oJson.UpdateString("product.aspects.CPU[0]","Dual-Core Processor")
$oJson.UpdateString("product.description","Test listing - do not bid or buy\n Built-in GPS. Water resistance to 50 meters.1 A new lightning-fast dual-core processor. And a display that�s two times brighter than before. Full of features that help you stay active, motivated, and connected, Apple Watch Series 2 is designed for all the ways you move ")
$oJson.UpdateString("product.upc[0]","888462079525")
$oJson.UpdateString("product.imageUrls[0]","http://store.storeimages.cdn-apple.com/4973/as-images.apple.com/is/image/AppleInc/aos/published/images/S/1/S1/42/S1-42-alu-silver-sport-white-grid?wid=332&hei=392&fmt=jpeg&qlt=95&op_sharpen=0&resMode=bicub&op_usm=0.5,0.5,0,0&iccEmbed=0&layer=comp&.v=1472247758975")
$oJson.UpdateString("product.imageUrls[1]","http://store.storeimages.cdn-apple.com/4973/as-images.apple.com/is/image/AppleInc/aos/published/images/4/2/42/stainless/42-stainless-sport-white-grid?wid=332&hei=392&fmt=jpeg&qlt=95&op_sharpen=0&resMode=bicub&op_usm=0.5,0.5,0,0&iccEmbed=0&layer=comp&.v=1472247760390")
$oJson.UpdateString("product.imageUrls[2]","http://store.storeimages.cdn-apple.com/4973/as-images.apple.com/is/image/AppleInc/aos/published/images/4/2/42/ceramic/42-ceramic-sport-cloud-grid?wid=332&hei=392&fmt=jpeg&qlt=95&op_sharpen=0&resMode=bicub&op_usm=0.5,0.5,0,0&iccEmbed=0&layer=comp&.v=1472247758007")
$oJson.UpdateString("condition","NEW")
$oJson.UpdateNumber("packageWeightAndSize.dimensions.height","5")
$oJson.UpdateNumber("packageWeightAndSize.dimensions.length","10")
$oJson.UpdateNumber("packageWeightAndSize.dimensions.width","15")
$oJson.UpdateString("packageWeightAndSize.dimensions.unit","INCH")
$oJson.UpdateString("packageWeightAndSize.packageType","MAILING_BOX")
$oJson.UpdateNumber("packageWeightAndSize.weight.value","2")
$oJson.UpdateString("packageWeightAndSize.weight.unit","POUND")
$oJson.UpdateNumber("availability.shipToLocationAvailability.quantity","10")

; Show the JSON to be sent:
ConsoleWrite($oJson.Emit() & @CRLF)

; Use a previously obtained user token.  The token should look something like this:
; "v^1.1#i^1#r^0#p^3#I^3#f^0#t^H4sIAAAAAAAAAOVXa2wUVRTu9k ... 89xuCWYREAAA=="
Local $sAccessToken = "EBAY_ACCESS_TOKEN"

$oHttp = ObjCreate("Chilkat.Http")

; This example uses the sandbox.  
; Change "api.sandbox.ebay.com" to "api.ebay.com" to use the production system.
; Note: The last part of the url is the SKU.  In this URL, the SKU is "AppleWatch".
Local $sUrl = "https://api.sandbox.ebay.com/sell/inventory/v1/inventory_item/AppleWatch"
$oJson.EmitCompact = True

; Set your Content-Language to whatever is desired.
$oHttp.SetRequestHeader "Content-Language","en-US"

; Add our access token to the request, which is a header
; having the following format:
; Authorization: Bearer <userAccessToken>
$oSbAuth = ObjCreate("Chilkat.StringBuilder")
$oSbAuth.Append("Bearer ")
$oSbAuth.Append($sAccessToken)
$oHttp.SetRequestHeader "Authorization",$oSbAuth.GetAsString()

$oHttp.Accept = "application/json"
$oHttp.AllowGzip = False

Local $strResponse = $oHttp.PutText($sUrl,$oJson.Emit(),"utf-8","application/json",False,False)
If ($oHttp.LastMethodSuccess <> True) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Response status code = " & $oHttp.LastStatus & @CRLF)

If ($oHttp.LastStatus <> 204) Then
    ConsoleWrite($strResponse & @CRLF)
    ConsoleWrite("Failed" & @CRLF)
    Exit
EndIf

; On success (status code = 204), there is no output payload (strResponse will be empty).
ConsoleWrite("Inventory item successfully created." & @CRLF)