I am having an issue with CurlMBS
Dim c As New CURLMBS
Dim ebayUrl As String
ebayUrl = "http://open.api.ebay.com/shopping?callname=GetSingleItem&responseencoding=JSON&appid=[APPID]&siteid=0&version=871&ItemID="+eBayItemID+"&IncludeSelector=TextDescription,ItemSpecifics,Details"
c.OptionVerbose=true
c.OptionURL = ebayUrl
c.CollectDebugData = True
c.CollectOutputData = True
title=Str(c.Perform)
//MsgBox c.OutputData
Dim apiResponseEbay As New JSONItem(c.OutputData)
Dim resultsEbay As JSONItem = apiResponseEbay.child("Item")
Dim currentResultEbay As JSONItem=resultsEbay.Value(0) (--------------------This is where my error is.. says "JSONItem is not an array"
Dim currentPriceEbay As JSONItem = currentResultEbay.Child("Seller")
Can someone please explain what I am doing wrong here? (i have hidden my APPID from the ebayUrl)
I have tried to use HTTPSocket as well, sometimes it returns the json, sometimes it doesnt return anything at all… very strange.