Задать вопрос
@IgorPlays

Почему в ответе Кракозябры в WinHTTPRequest.5.1 VBA?

Пишу код на получение ответа с сервера в виде json,
Dim strResult2 As String
    Dim objHTTP2 As Object
    Dim URL2 As String
    Set objHTTP2 = CreateObject("WinHttp.WinHttpRequest.5.1")
    URL2 = "site.com/get_info"
    objHTTP2.Open "GET", URL2, False
    objHTTP2.SetRequestHeader "Accept", "application/json; charset=utf-8"
    objHTTP2.SetRequestHeader "User-Agent", "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/106.0.0.0 Safari/537.36 Edg/106.0.1370.37"
    objHTTP2.send


    Dim Json As Object
    
    
    response = objHTTP2.responseText
    
    Debug.Print response


В ответе получаю вот это
6343d8f7ec5d2010691684.png

Если убераю фрагмент
objHTTP2.SetRequestHeader "Accept", "application/json; charset=utf-8"

То просто рандомные символы, кто может помочь в этом вопросе?
листаю интренет уже много так и не могу найти ответа.
Если меняю WinHttp.WinHttpRequest.5.1 на MSXML2.ServerXMLHTTP
То выдаёт 401 (Not Auth)
  • Вопрос задан
  • 409 просмотров
Подписаться 1 Простой Комментировать
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Похожие вопросы