-d '{ Please let me know your thoughts in the comments. Learn more, Cannot retrieve contributors at this time, ' VBJSON is a VB6 adaptation of the VBA JSON project at http://code.google.com/p/vba-json/, ' Some bugs fixed, speed improvements added for VB6 by Michael Glaser (vbjson@ediy.co.nz), ' parse string / number / object / array / true / false / null, ' Array BoDy, Integer BaseCount, String PoSition, ' String PointBuffer1, String PointBuffer2, ' multiArray = multiArray & toString(Eval("aBD(" & sPB2 & ")")), 'Public Function JsonRpcCall(url As String, methName As String, args(), Optional user As String, Optional pwd As String) As Object, ' Set r = CreateObject("Scripting.Dictionary"), ' Set cli = CreateObject("MSXML2.XMLHTTP.6.0"), ' If Len(user) > 0 Then ' If Not IsMissing(user) Then, ' cli.Open "POST", url, False, user, pwd, ' cli.setRequestHeader "Content-Type", "application/json", ' Err.Raise vbObjectError + INVALID_RPC_CALL + cli.Status, , cli.statusText, ' If r("id") <> reqId Then Err.Raise vbObjectError + INVALID_RPC_CALL, , "Bad Response id", ' If r.Exists("error") Or Not r.Exists("result") Then, ' Err.Raise vbObjectError + INVALID_RPC_CALL, , "Json-Rpc Response error: " & r("error")("message"), ' If Not r.Exists("result") Then Err.Raise vbObjectError + INVALID_RPC_CALL, , "Bad Response, missing result". This can simplify programmatic access to the data… a lot. It takes less than a second to process a megabyte-sized file. I am trying to POST a URL encoded JSON string a web service. Learn more, We use analytics cookies to understand how you use our websites so we can make them better, e.g. Learn more, We use analytics cookies to understand how you use our websites so we can make them better, e.g. The following Tokenize() function uses VBScript’s regex engine to do the heavy lifting: Granted, the regex matching pattern looks intimidating, but it is actually extremely efficient. Imports System.Net Copy link alecoronel commented Mar 29, 2015. We use optional third-party analytics cookies to understand how you use GitHub.com so we can build better products. So how do we process json data in VBA? curl -X POST --header 'Content-Type: application/json' I am having a really difficult time figuring out if VB6's SOAP type (version 1) can handle a returned object - as opposed to simple types like string, int, etc. Instead every single full path including the final key is stored AS TEXT in the dictionary as a dictionary key to the actual data item. They are scant, really. The data types can be converted by your code easily if you need or want that. But virtually all json data I work with is valid from the get go. Sign in to view. --header 'Accept: application/json' The only other option is to write your own VBA routine to parse out the values from a json string or file. In a similar vein, all escaped characters are untouched. To process json data in VBA, there are very few choices. this curl post can manage to post data to the website. But they do! But I cannot find Request.AddBody method in my WebRequest class. This can easily be done in VBA code, but it is more than 100 times quicker to have a RegEx pattern match what we need. i encountered a problem to using button to post the json to the website.