WindowsXPのPCのファイルの文字列を自動で変換したい

質問

こんにちは。

PCにあるテキストファイルの内容を自動で変換したいのですが、
やり方がわからなくて困っています。

具体的に実現したい事は以下の通りです。

C:\test\abc1.txtがあったら、abc1.txtに書かれている文字列
tokyo を osaka
に変更したいのです。abc1.txtは、PCによって存在するかどうか
は分からないので、存在する時のみ修正する必要があります。
また、特別な開発ツールは使わずに出来る方法である必要があります。

調べるにもなにから調べるのか手がかりがなく困っています。

PCのOSはWindowsXPです。

よろしくお願いします。

回答No.3

Masa2072 · ベストアンサー

以下のコードを任意の場所に****.vbsという名前で保存(****は適当に）

Set FSO = CreateObject("Scripting.FileSystemObject")

If FSO.FileExists("C:\test\abc1.txt") Then
Set TXT = FSO.OpenTextFile("C:\sample.csv", 1)
Buffer = TXT.ReadAll
TXT.Close
Set TXT = FSO.GetFile("C:\test\abc1.txt").OpenAsTextStream(2, 0)
TXT.Write Replace(Buffer,"yokyo", "osaka")
TXT.Close
Set TXT = Nothing
End If

Set FSO = Nothing

作成したファイルを実行すれば（Explorerからダブルクリックもしくは「ファイル名を指定して実行」から）、ご希望のことが出来ると思います。
※試すときは予めC:\test\abc1.txtのコピーをとっておいてください
定期的に実行するならタスクに登録

お礼

回答ありがとうございます。
まだ途中ですが、教えて頂いた方法でなんとか出来そうです。
どうもありがとうございました。

回答No.4

Masa2072

No3です
先ほどの回答の
c:\sample.csvの場所を C:\test\abc1.txtに置き換えてください。

お礼

回答ありがとうございます。
まだ途中ですが、教えて頂いた方法でなんとか出来そうです。
どうもありがとうございました。

回答No.2

akina_line

こんにちは。

　もう少し背景を書かないと、思った回答はもらえないと思います。
　　・なぜ自動でする必要があるのか。
　　・そのファイルがあるかないかは固定なのか、それとも他のソフトが生成するのか、ユーザが必要なときに作るのか。
　　・そのPCは誰が使用しているのか。貴方だけ、(会社だとすると)他の誰か、(会社だとすると)社員全員のPCか。

補足願います。

お礼

回答ありがとうございます。
自動でする理由：手入力による変換ミスを防ぎたいからです。
そのファイルがあるかないかは不定です。他のソフトが生成します。
PCは社員全員のPCです。
どうもありがとうございました。

回答No.1

kaz5919

特別なツールを使わないでとなると
ウィンドウズの標準機能でってことですよね

それだったらファイル検索して、
結果ファイルの中身を置換ぐらいしかないですかね。。

こういうことをしてくれるソフトはあったような気がしますが・・・

お礼

回答ありがとうございます。
私も初めは検索して置換しかないかなとおもいましたが
なにかWindowsの標準でできないかなと思い質問させて
いただきました。
どうもありがとうございました。