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

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根据需要转换为字符串。