- ベストアンサー
指定したファイルの文字コードをShift_Jis→Unicodeに変換してくれるソフト(Windows)
質問させて下さい。 タイトルのままですが、ファイルの文字コードを、Shift_JisからUnicode(UTF-16LE)に変換してくれるフリーウェアを探しています。 メモ帳を使えば可能な事ですが、何百というファイルを処理したいので、専用のソフトがあれば…、と思っています。 できれば、複数のファイルのD&D→一括変換が出来るものがいいです。 ベクターで探したのですが、適当なものが見つかりませんでした…。 どうかよろしくお願いします。
- garibar2
- お礼率42% (84/196)
- フリーウェア・フリーソフト
- 回答数4
- ありがとう数7
- みんなの回答 (4)
- 専門家の回答
質問者が選んだベストアンサー
84行目ですよね 出力先フォルダを作成しようとして、コケてますね。 出力先は「strNewFileFolder」に指定されている場所です。 既存物では strNewFileFolder = strFolder & CONVERT_OUT となっているので、変換元ファイルの下にフォルダを作成しようとしています。 例. 変換前/C:\新しいフォルダ\テキストファイル.txt 変換後/C:\新しいフォルダ\変換後\テキストファイル.txt 元のプログラムが CONST CONVERT_OUT = "変換後\" となっている部分を CONST CONVERT_OUT = "C:\Program Files\s16s\" としたのですよね? 出力先をフルパス指定したのであれば strNewFileFolder = strFolder & CONVERT_OUT を改造して strNewFileFolder = CONVERT_OUT としてください。 >82~85行目までの、If文を削除して実行したところ、 復活させておいてくださいね^^; もし、それでも走らなかったら、変更箇所をおしえてください^^
その他の回答 (3)
- 1050 円(@1050YEN)
- ベストアンサー率69% (477/687)
まず、#1で挙げたプログラムが用意されていることが必須です。 その上で、以下の手順を行ってください。 手順1. 下に書かれている「Option Explicit」より下のプログラムをメモ帳などに張ってください。 手順2. 先頭の方にある CONST EXENAME_16_TO_S = "C:\16S.EXE" CONST EXENAME_S_TO_16 = "C:\S16.EXE" はExeのパスです。 環境に合わせて変更してください。 手順3. このサンプルはSJIS→Unicode用になっています。 Unicode→SJIS用したい場合は 「strHENKAN = EXENAME_S_TO_16」 の部分を 「strHENKAN = EXENAME_16_TO_S」 にしてあげてください。 手順4. ファイルを保存します。 「無題.txt」でも何でもファイル名は何でも良いです。 手順5. ファイルの拡張子を変更してあげてください。 「無題.txt」→「無題.vbs」 手順6. あとはファイルを無題.vbsへDDするだけで、変換対象ファイルが存在するフォルダに「変換後」フォルダが作成され、結果を得ることが出来ます。 -------------------------------------------------------------- Option Explicit CONST EXENAME_16_TO_S = "C:\16S.EXE" '← EXEが置いてある場所 for SJIS変換 環境に合わせて変更してください CONST EXENAME_S_TO_16 = "C:\S16.EXE" '← EXEが置いてある場所 for Uni変換 環境に合わせて変更してください CONST CONVERT_OUT = "変換後\" '← 変換後の出力先フォルダ '----------------------------------------------- Dim strHENKAN strHENKAN = EXENAME_S_TO_16 '← SJIS から Unicode変換を指定 'パラメータを取得して、メイン実行部を行う Dim objArgs Dim oShell Dim fsoObj 'オブジェクト生成 Set objArgs = WScript.Arguments Set oShell = CreateObject ("WSCript.shell") Set fsoObj = CreateObject("Scripting.FileSystemObject") 'メイン実行 Call MainProc(objArgs) 'オブジェクト開放 Set oShell = Nothing Set fsoObj = Nothing Set objArgs = Nothing '----------------------------------------------- '----------------------------------------------- 'メイン実行部 '----------------------------------------------- Sub MainProc(arg) Dim objParam 'パラメータループ For Each ObjParam in arg 'ファイルであるかをチェック If fsoObj.FileExists(objParam) Then '変換メイン実行 Call ConvertExec(objParam) End If Next End Sub '----------------------------------------------- '変換メイン '----------------------------------------------- Sub ConvertExec(inFileName) Dim fsoFile Dim strFolder Dim strName Dim strCmd Dim strNewFilePath Dim strNewFileFolder 'ファイルオブジェクト取得 Set fsoFile = fsoObj.GetFile(inFileName) 'ファイルオブジェクト取得 Set fsoFile = fsoObj.GetFile(inFileName) 'フォルダパスとファイルパスに分解 strFolder = fsoFile.ParentFolder 'フォルダ名 strName = fsoFile.Name 'ファイル名 'フォルダパス正規化 If (Right(strFolder,1) <> "\") Then strFolder = strFolder & "\" End If '出力先フォルダを指定(元のファイルの存在しているパスの下のCONVERT_OUTで指定してあるフォルダ) strNewFileFolder = strFolder & CONVERT_OUT '出力先フォルダが存在しなければ作成 If Not fsoObj.FolderExists(strNewFileFolder) Then Call fsoObj.CreateFolder(strNewFileFolder) End If '出力ファイル名を設定(元のファイルと名前は一緒) strNewFilePath = strNewFileFolder & strName '変換コマンド文字列を作成 strCmd = strHENKAN & " " & Chr(34) & inFileName & Chr(34) & " " & Chr(34) & strNewFilePath & Chr(34) '変換実行 oShell.run(strCmd) End sub
お礼
ここまでして頂いて、本当にありがとうございます!!!大変助かります!!! 早速、Option Explicit以下の行をvbsファイルとしてD&Dしてみたのですが、84行目にエラーが出てしまってうまく変換できません。私がどこか間違ってしまってますでしょうか? 84行目とは、 Call fsoObj.CreateFolder(strNewFileFolder) という所なのですが…。 以下のようなエラーメッセージです。 ------------------------------------------ 行: 84 文字: 1 エラー: ファイルの名前または数が不正です。 コード: 800A0034 ソース: Microsoft VBSprict 実行時エラー ------------------------------------------ 最初に代入したCONST CONVERT_OUTには、 exeファイルと同じ場所(C:\Program Files\s16s\)を指定しています。 試しに、82~85行目までの、If文を削除して実行したところ、今度は、 oShell.run(strCmd) という最後から2番目の行でエラーが起こってしまいました。 エラーメッセージは、「指定したファイルが見つかりません」というものでした。 本当に申し訳ないのですが、お目を通して頂けたらとても嬉しいです…。
- 1050 円(@1050YEN)
- ベストアンサー率69% (477/687)
VBスクリプト経験ありますか? Windows上で動くプログラムを書いて、DDで渡すと、コマンドを毎回書かないで実行できます。 サンプル書きますんで、可能だったら使ってみてください。 サンプルちょっとまってね^^;
- 1050 円(@1050YEN)
- ベストアンサー率69% (477/687)
検索結果 http://computers.yahoo.co.jp/download/vector/win95/util/text/conv/code/ その中の一つで、これかな? http://www.vector.co.jp/soft/win95/util/se250669.html?y
お礼
ご回答ありがとうございます。 ご紹介下さったソフトは一度ためしたのですが、コマンドラインからしか使えないため、あまり時間の節約にならない感じでした…。 私にコマンドラインを活用する知識がないせいなのでしょうか…(現在はコマンドプロンプトにファイルを一個ずつD&Dして行なっています)。
関連するQ&A
- UTF-8で書かれたファイルをshift-jisに変換したい
あるフォルダの下にある複数のファイル(文字コード:UTF-8)を、shift-jisに変換するおすすめツールがありましたら教えてください。
- 締切済み
- その他([技術者向] コンピューター)
- cookieのテキストファイル%u3036などをshift-jisに変換
htmlでボタンを作り、onclickでjavascriptを実行しました。 javascriptの中で、htmlのinputボックスの中身をcookieに保存しました。 その後、mydocumentの中のバッチファイルを用いてcookie内のテキストファイルを加工したいのですが、エディタで開くと%u3083というようなテキストで表示されてしまいます。 どうしたら普通に読める文字になるでしょうか? ・%u以降のコードはUTF-16であるように思います。 ・VectorにあるUTF-16→shift-jis変換をするソフトを利用しても 上手く変換できませんでした。 同じように、UTF-8→shift-jis変換も上手く変換できませんでした。 ・Windows2000でGAWKを使ってテキストを加工します。 よろしくお願いします。
- 締切済み
- その他(ソフトウェア)
- 文字コードshift-jisへの変換について
お世話になります。 .NET C#にて開発をしております初心者です。 C#からテキストデータにデータの書き出しを行っており、 文字コードをUTF-8からSHIFT-JISへ変換したいのですが、 ネット等で確認し、記述したのですが、データの中には 半角カナ文字もあり、どうも変換がうまくいきません。 どなたかサンプルコードまたは、参考になるサイトなどを お教え頂きたく宜しくお願い致します。
- ベストアンサー
- C・C++・C#
- EUCコードのファイル名をShift_JISコードに一括変換するソフト
タイトルのとおりなんですが、EUCコードで表示されてしまっている多数の「ファイル名」(ファイルの名前のみで結構です)を、Shift_JISコードに一括変換してくれるソフトをご存知の方がおりましたら、おすすめソフトを教えてください。お願いします。
- ベストアンサー
- フリーウェア・フリーソフト
- リダイレクトする時の文字コードをUnicodeに
現在、VisualStudioで、システムコールの標準出力結果をリダイレクトしてファイルに保存する プログラムを書いています。 _tsystem(command); のような感じで、commandには "hogehoge > hoge.txt"のように入ります。 ※command はTCHAR この出力結果が、Shift-Jisになっているようで、Shift-Jisだと日本語が文字化けせずに表示されるのですが、Unicode UTF-16にすると文字化けしてしまいます。 Unicode UTF-16とかUnicode UTF-8など文字コードを指定してリダイレクトできないのでしょうか。 ちょっと調べてみましたがうまく見つかりませんでした。
- 締切済み
- C・C++・C#
- 複数のファイルをUnicodeからShift JISへ変換する(秀丸)
現在、秀丸を使っています。大量のテキストファイルをUnicodeからShift JISに変換したいと思っています。ネット上で、見つけたマクロで個々に変換することはできるのですが、一括でできるような方法を探しています。何か良い方法があれば、教えていただけないでしょうか。
- 締切済み
- その他(ソフトウェア)
- シフトJISをunicodeへ(逆)変換したい
このカテで良いのか良く分からなかったのですが... シフトJISのバイナリコードをunicodeバイナリコードへ(あるいは逆)変換するための対応表(URL)を探しているのですが良くわかりません。 米国で使用されている2バイトコード体系へ変換したいのでunicodeか否かはっきりしないという問題もあります。 以上について、わかりやすい参考URLがありましたら教えて下さい。
- ベストアンサー
- その他(ソフトウェア)
- UTF-8からShift-JISへの文字コード変換について
文字コードがUTF-8のファイルをShift-JISに変換する方法についてご存知の方がいらっしゃれば教えていただきたいです。 仕事上で、UTF-8のファイルをしばしば受領するのですが、Shift-JISに変換しないと、その後の処理ができない作業があり、今は秀丸で開いて、文字コードを変換して保存し直してます。 私以外のメンバも今後同じ作業を実施するようになり、引継ぎ手順書を作成しているのですが、ツール等を使わないWindows標準機能を用いた手順を要求され、どうすればいいかわからなくなって質問させていただきました。 よろしくお願い致します。
- 締切済み
- Windows XP
- 文字コード変換ツール
テキストファイルの文字コード変換ツールを探しています。 変換を行うのは、Shift_JISとUnicode、Unicodeと韓国語、Unicodeと中国語 です。 私が試したのは、1行が512バイトを超えると切れてしまいます。 複数(多数)のファイルをまとめて変換できると尚可です。 (ちなみに、秀丸はあるのですが、何とかして、まとめて変換できないでしょうか。) OSはWindowsXP
- 締切済み
- その他(Windows)
- ファイルコードの変換の問題
現在、shift-jis ファイルをUTF-8に変換するところです。 使っているソフトはGNU の iconvです。バージョン1.10です。 iconv -f SHIFT_JIS -t UTF-8 a.txt > b.txt で文字コードが変換されていない 詳しい方が教えていただけないでしょうか
- ベストアンサー
- その他(プログラミング・開発)
お礼
素早くて的確なレス、本当にありがとうございます! 「変換後」というフォルダ名を、「変換したものを入れたいフォルダのフルパスに置き換えればいいのか…」と、大変な勘違いをしていました。 申し訳ありません! 全て元に戻したところ、無事に動きました! 大変助かりました。 1050YENさん本当にありがとうございました!