Я пытаюсь создать макрос Excel, который может отправлять GET-запрос API-интерфейсу Plumber, размещенному на RConnect. Я разработал API Plumber, он работает как задумано. Во время тестирования я запустил его на своем локальном компьютере, поэтому он работал на 127.0.0.1:xxxx, и вставка его в качестве URL-адреса для доступа в коде VBA работала нормально. Однако теперь, когда я опубликовал API для RConnect, использование URL-адреса для API из RConnect больше не работает в Excel, просто выдает ошибку. Даже когда я нажимаю URL-адрес, когда он просто вводится в пустую ячейку в Excel, он выдает ошибку. Но когда я вставляю этот же URL-адрес в Chrome, ожидаемый текст ответа уже есть, и он отлично работает.
Код запроса URL-адреса, который я использовал до публикации в RConnect, равен
Dim objHTTP As Object
Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
objHTTP.Open "GET", URL, False
objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
objHTTP.setRequestHeader "Content-type", "application/x-www-form-urlencoded"
objHTTP.Send ("keyword=php")
Я думаю, что это какая-то проблема со строкой CreateObject
, но я не уверен. У меня нет опыта в веб-разработке, поэтому многое из этого мне чуждо. Любая помощь или вклад будет принята с благодарностью. Спасибо.