vb6 - キリル文字の応答テキストを取得する方法

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して文字列に変換できます。