VBA HTTP响应文本不支持日语

Question

我有一个VBA程序，可以发送REST API请求并获取响应。

我使用WinHttp.WinHttpRequest发送请求，但响应文本不支持日语。

这意味着如果REST服务器以日语返回结果，则VBA中的HTTP响应文本将是奇怪的字符（例如？aa ?? a）。

我尝试使用Accept-Language = ja-JP，Charset = UTF-8来设置SetRequestHeader ...

请帮助我解决此问题。

我的代码在这里：

Dim oHttp As WinHttp.WinHttpRequest
Set oHttp = New WinHttp.WinHttpRequest
oHttp.Open "GET", "url", False
oHttp.SetRequestHeader "Accept",  "application/json"
oHttp.SetRequestHeader "Content-Type", "application/json"
oHttp.SetRequestHeader "Authorization", "Bearer <token>")
oHttp.Send (sData)
Debug.Print oHttp.ResponseText

谢谢

Answer 1

我找到了一个解决方案：使用ServerXMLHTTP代替WinHttpRequest。