Vba post request json

'https://github.com/VBA-tools/VBA-Web. 
'Using this library, it would look like:

Sub sendPostRequest()
  Dim Body As New Dictionary
  Dim Client As New WebClient
  Dim Response As WebResponse

  Body.Add "mType", "OPEN_SYSTEM_TRADE"
  Body.Add "systemOwnerId", 10
  'Equal to Body = "{""mType"":""OPEN_SYSTEM_TRADE"",""systemOwnerId"":10}"

  Set Response = Client.PostJson("somewebsite.com", Body)

  Worksheets("Sheet1").Range("A1").Value = Response.Content
End Sub

Source: stackoverflow.com

Similar codes

0 vote165 views1 answer
Thread sleep vb
VBA
-1 vote156 views1 answer
How to correct a number to 2 decimal places in vba
VBA
4 votes146 views1 answer
Excel formula for last non-empty cell in a column
VBA
0 vote156 views1 answer
Rotate image by any angle vb.net
VBA
0 vote162 views1 answer
VBA is form loaded
VBA
0 vote153 views1 answer
Vba parameter adodb null value
VBA
3 votes149 views1 answer
Extract the nth word from a text string
VBA
0 vote154 views1 answer
Ribbon show/hide
VBA
5 votes150 views1 answer
Excel formula how to create strings containing double quotes
VBA
0 vote160 views1 answer
Vba remove last vbcrlf
VBA