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 vote230 views1 answer
Vba min
VBA
0 vote226 views1 answer
Vbs
VBA
0 vote221 views1 answer
Vbscript abs
VBA
0 vote207 views1 answer
Change "location" of binding navigator vb
VBA
5 votes239 views1 answer
Excel vba low byte from INTEGER
VBA
1 vote219 views1 answer
Excel vba make cell visible
VBA
0 vote232 views1 answer
Vba collection contains
VBA
3 votes215 views1 answer
Excel vba get the workbook full file name with path
VBA
0 vote284 views1 answer
Visual basic run command
VBA
0 vote221 views1 answer
VB get external IP address
VBA