| ■1436 / ) |
Re[9]: 桐のデータで電子申請するには
|
□投稿者/ hidetake -(2006/09/30(Sat) 10:49:41)
| > 桐のシェル実行で、事前に作成したbatファイルを利用して「Shift_JIS」から、
> 「UTF-8」へ漢字コード変換を行います
Shift_JIS から UTF-8 への文字コード変換は、今どきの PC だったら
次のような VBScript でも変換できますよ。
SJIS.txt を UTF8.txt と言うファイルに変換します。
SJIS2UTF8.VBS
------------------------------------------------------------
Const adTypeText = 2
Const adSaveCreateOverWrite = 2
Set Src = CreateObject("ADODB.Stream")
Src.Open
Src.Type = adTypeText
Src.Charset = "Shift_JIS"
Src.LoadFromFile "X:\SJIS.txt"
Set Dst = CreateObject("ADODB.Stream")
Dst.Open
Dst.Type = adTypeText
Dst.Charset = "UTF-8"
Src.CopyTo Dst
Src.Close
Dst.SaveToFile "X:\UTF8.txt", adSaveCreateOverWrite
Dst.Close
Set Src = Nothing
Set Dst = Nothing
------------------------------------------------------------
|
|
