Получение ошибки с вызовом VBA-Web HttpGet в MS Access - PullRequest
0 голосов
/ 12 декабря 2018

Веб-библиотека для обработки вызовов JSON в VBA:

https://github.com/VBA-tools/VBA-Web

Этот вызов в Postman работает нормально:

curl -X GET \
  https://<URL>/ \
  -H 'Content-Type: application/x-www-form-urlencoded' \
  -H 'Postman-Token: dee67429-d5f8-45fd-8004-f5c244729526' \
  -H 'cache-control: no-cache' \
  -d 'api_key=<Key>'

Я борюсьв Access, чтобы заставить работать код VBA-Web.Это то, что я кодировал:

Dim Client As New WebClient
Dim Request As New WebRequest
Dim Response As WebResponse
Dim Body As New Dictionary

Client.BaseUrl = "https:<URL>"

Request.Method = WebMethod.HttpGet
Request.ContentType = "application/x-www-form-urlencoded"

Request.AddBodyParameter "api_key", "<Key>"

Set Response = Client.Execute(Request)

Кажется, что происходит попадание в API, так как Response in Content выглядит так: "{" error ":" Invalid request "}".Есть мысли, где я сбился с пути?Обратите внимание, что для этого вызова не требуется Request.Resource, так как он находится на корневом уровне.У них есть другие API, которые находятся на следующем уровне ниже.

Спасибо !!!

...