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

VB初心者 2004-05-24 20:43:48 No: 83496

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

oku URL 2004-05-25 07:43:56 No: 83497

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

VB初心者 2004-05-25 19:38:57 No: 83498

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

MM 2004-05-25 21:21:41 No: 83499

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

VB初心者 2004-05-26 18:51:25 No: 83500

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

MM 2004-05-26 21:19:11 No: 83501

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

test 2004-05-26 22:28:58 No: 83502

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

VB初心者 2004-05-27 02:54:35 No: 83503

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

魔界の仮面弁士 2004-05-27 05:04:41 No: 83504

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

IMA 2004-05-27 16:41:06 No: 83505

参考情報です。

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...)では変更せずに使用することが出来ます。

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