| 投稿日 | ： 2006/11/13(Mon) 13:11 |
| 投稿者 | ： 魔界の仮面弁士 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^7: テキストから文字を取得したいのですが |
> 'strdata = .ReadText(adReadLine)
> strdata = .Read(adReadAll)
strdata という事は、Byte配列ではなく、String の変数ですよね。
こういうときは、文字列型を介さず、直接 Byte 配列に入れてチェックした方が安全かと。
> Ates = strdata
> For inttest = 0 To UBound(Ates)
> Debug.Print Ates(inttest) & " = " & Chr(Ates(inttest))
> Next
Ates というのは、バイト配列ですか?
UTF-16の各バイト値を Chr() にかけていっても、意味のある結果は得られないのでは。
> 255 =
> 254 =
> 165 = ･
> 51 = 3
つまり、16進数で表記すれば、「FF,FE,A5,33」という事ですね。
> ちなみに平方キロの場合は
> 255 =
> 254 =
> 162 = ｢
> 51 = 3
こちらは、「FF,FE,A2,33」となりますよね。
『Streamに取り込んだ際にすでに化けてしまっています。』とのことでしたが、元データは、
>>> 立方メートルが FF,FE,A5,33,
>>> 平方メートルが FF,FE,A2,33,
だったのですから、何の問題も無く取り込まれているように見えますけれども……?
もう一度、出力部分のコードを見直してみてはいかがでしょう。