如何获得西里尔文响应文本

Question

Dim http As WinHttpRequest
Set http = New WinHttpRequest 
http.open "POST", "test.php", False
http.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
http.send "txtmbx=test"
msgbox(http.responsetext)

http.responsetext 是西里尔文，我无法阅读文字。如何检索西里尔字母？

Answer 1

WinHTTPRequest 不支持编码方法，虽然它没有明确说明，但我希望它使用CP_ACP，这是从接收到的字节数据转换为字符串时的系统默认代码页。

您可以使用ResponseBody方法将数据作为字节数组获取，并使用StrConv根据需要转换为字符串。