コードを変換するには？ (ID:109084)

名前

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

本文 FileSystemObjectで扱えるUnicodeは、UTF-8ではなく、 いわゆる UTF-16 と呼ばれるコード体系になっています。 UTF-8を扱うのであれば、ADODB.Streamオブジェクトや、 MSXML2.XMLHTTPオブジェクトを使うのが簡単でしょう。 前者は、このように使います。ローカルファイルが対象です。 Const adReadAll As Long = -1 With CreateObject("ADODB.Stream") .Open .Charset = "UTF-8" .LoadFromFile "C:\UTF-8.TXT" strUTF8 = .ReadText(adReadAll) .Close End With 一方、後者はこのように使います。 Web上のデータが対象です。 URL = "http://www.akatsukinishisu.net/kanji/genso/UTF-8.html" With CreateObject("MSXML2.XMLHTTP.4.0") .open "GET", URL, False .send strUTF8 = .responseText End With