ResponseTextの値の文字化け (ID:101853)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ResponseText は、文字コードの判定に制限がありますね。 サーバー側のカスタマイズが可能なら、ResponseXML の方が 文字コードの扱いとしては確実だったりします。 サーバー側に XML を返させることが出来ないのであれば、 responseBody もしくは responseStream を使うことになるでしょう。 ADODB.Stream で変換するのであれば、たとえばこんな感じで。 Set stm = CreateObject("ADODB.Stream") stm.Type = 1 'バイナリモード stm.Open stm.Write objXMLHTTP.responseBody 'バイナリを書き込み stm.Position = 0 '先頭に戻してから stm.Type = 2 'テキストモードに変更 stm.Charset = "shift_jis" strResult = stm.ReadText(-1) 'データ全体を読み込む stm.Close Msgbox strResult