掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
UTF-8のファイルを読み込みShift_JISに変換して表示するには？ (ID:117116)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
>> MSXMLを使ってパースすれば、文字コードを気にせずに済むかと。 > えっ…！そうなんですか？？ XMLファイルをloadメソッドで読み込めば、<?xml version="1.0" encoding="UTF-8"?>の部分を認識して、適切な文字コードのファイルとして読み込まれますよ。 特に今回はUTF-8なので、この宣言が無くても正しく認識されるでしょう。 > 文字化けの状況としては、なにもせずこのまま表示すると、"〜"の文字が"?"に化けてしまいます。 下記のコードでは、ChrW(&HFF5E) の「〜」が表示されます。 Dim S As String Dim x As MSXML2.DOMDocument Set x = New DOMDocument40 x.loadXML "<a/>" x.documentElement.Text = "〜" S = x.documentElement.firstChild.Text MsgBox Hex(AscW(S)) & ":" & S, vbInformation > もしかしてこれって他の原因でしょうか？ "WAVE DASH" と "FULLWIDTH TILDE" の違いとか…。 http://park3.wakwak.com/~ozashin/sw_tips/webapp_tips/sjis_charset.html >> ファイルからの読込なら、処理としては、 > XMLをファイルをDOMで直接パースしたいので、ファイルから読み込む方法は現在考えておりません。 あれ? どういう事でしょうか? 「ファイルを」パースしたいのに、「ファイルから読み込む方法」が使えないのですか?
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.