S-JISからEBCDICに変換するには？

VB初心者  2004-05-24 11:43:48  No: 83496  IP: [192.*.*.*]

始めまして、いつも拝見しております。
今VBでS-JISからEBCDICに変換するツールを作っています。
いろいろ調べてみて、１バイトずつ変換する方法があるみたいです。
参考になるコードがあれば、教えていただきたいです。
また、他に簡単に文字コードを変換できるような方法があれば、
教えていただきたいです。
宜しくお願い致します。
（環境：VB6.0(SP5)、WindowsNT）

編集 削除
oku  URL  2004-05-24 22:43:56  No: 83497  IP: [192.*.*.*]

>S-JISからEBCDIC
ではなく、ASCIIコードからEBCDICコードじゃないですか？
EBCDICは何種類かあるので、どれかわかりませんが、
下のサイトにコード表があるので、
参考にしてみてください。
http://www.pleasuresky.co.jp/

編集 削除
VB初心者  2004-05-25 10:38:57  No: 83498  IP: [192.*.*.*]

失礼しました。正確に言うと、半角文字はASCIIコードからEBCDICコード（IBM）に変換、全角文字はS-JISからIBM漢字に変換することでしょうか。
変換方法（コマンドなど）ありますか。

編集 削除
MM  2004-05-25 12:21:41  No: 83499  IP: [192.*.*.*]

>変換方法（コマンドなど）ありますか。
VB標準ではないです。

編集 削除
VB初心者  2004-05-26 09:51:25  No: 83500  IP: [192.*.*.*]

MMさん、ありがとうございます。
＞＞変換方法（コマンドなど）ありますか。
＞VB標準ではないです。
一般的のVBでEBCDIC文字コード変換の方法を教えていただけますか？

編集 削除
MM  2004-05-26 12:19:11  No: 83501  IP: [192.*.*.*]

一般的に規則性のないコード変換を行うときは
入力コード→出力コードを羅列したテーブルに
よる変換となります。

編集 削除
test  2004-05-26 13:28:58  No: 83502  IP: [192.*.*.*]

要するに
> いろいろ調べてみて、１バイトずつ変換する方法があるみたいです。
という事だと思います。

編集 削除
VB初心者  2004-05-26 17:54:35  No: 83503  IP: [192.*.*.*]

API関数などの方法はありますか？

編集 削除
魔界の仮面弁士  2004-05-26 20:04:41  No: 83504  IP: [192.*.*.*]

Snanls.dll の SnaNlsMapString APIを使えば、EBCDIC との相互変換は可能かも知れません。
ただし、SNA Server 3.0/4.0、またはHost Integration Server 2000/2004が必要になりますけれども。

編集 削除
IMA  2004-05-27 07:41:06  No: 83505  IP: [192.*.*.*]

参考情報です。

http://hobby400.hp.infoseek.co.jp/
のsoftwareの頁の中にwindows用として
コード変換関数集(ActiveX DLL)  CvtCode と言うものが
掲載されています。
http://hobby400.hp.infoseek.co.jp/software/cvtcode.htm

>ソース公開について
>希望があればCvtCode.DLLのソースをシェアウェアとして別公開する予定です。
>ソースは、Visual Basic 6.0で作成されているので、Visual Basic for >Applications2000(Excel,Access...)では変更せずに使用することが出来ます。

となっていますので、別途ご相談に載っていただけるかも

編集 削除