| 投稿日 | ： 2006/12/12(Tue) 10:44 |
| 投稿者 | ： かい |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^8: テキストから文字を取得したいのですが |
> > '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,
> だったのですから、何の問題も無く取り込まれているように見えますけれども……?
>
>
> もう一度、出力部分のコードを見直してみてはいかがでしょう。
大変遅くなってもうしわけありません。
一応結果報告を。
結局時間が間に合わなくて、手作業になりました。
魔界の仮面弁士様ご助言ありがとう御座いました。