テキストファイルを出力しているプログラムがあるのですが、
このプログラムで出力したファイルについて、
「出力ファイルしたファイルが JISコード で出力されている
ので、シフトJISコード で出力して欲しい。」
という指摘を受けました。
出力されたファイルは、本当に、JISコード なのでしょうか？
JISコード であれば、シフトJIS コードで出力する事はでき
るのでしょうか？
また、テキストファイルの文字コードを調べる方法はあります
でしょうか？
宜しくお願い致します。

-- プログラム（抜粋） ---------------------------------

'出力ファイル情報
Private gintFileNumber           As Integer

Open "c:\test.txt" For Output As #gintFileNumber

Dim strText As String

strText = "あああ"

Print #gintFileNumber, strText

Close #gintFileNumber

こんばんは

ADOにStream オブジェクトというのがあります。
Charset プロパティを "shift_jis"で指定して、
SaveToFile メソッドで書き出せばどうでしょう？

詳しくはググるか、MSDNで調べてください。
ADO2.6以降で可能だったと思います。

・・とその前にSJISとは思うんですが？？

SJISで読み込んでみて表示させるので、確認になればいいんですけど。
そこらあたりはわかりません。文字コードを調べるとか・・・

> 出力されたファイルは、本当に、JISコード なのでしょうか？

　このコードであれば、シフトJISで出力されています。

> また、テキストファイルの文字コードを調べる方法はあります
> でしょうか？

　バイナリエディタで、文字データのコード体系を切り替えて
表示すれば確認できます。

　とりあえず、おすすめのバイナリエディタです。

http://www.vector.co.jp/soft/dl/win95/util/se032859.html

おすすめのバイナリエディタで確認した
ところ、シフトＪＩＳで出力されている
事が確認できました。
ご教授、ありがとうございました。m(_ _)m