自動化・効率化ならKTパソコンスクール

UWSCで指定したフォルダ内の全ての拡張子txtのファイル内の１つの文字列を置換するプログラムを作ってみました。

デスクトップ上の全てのtxtファイル内の１つの文字列を置換するプログラム（こんにちはをHelloに置換）

path = "C:\Users\{ユーザー名}\Desktop\"

files = "*.txt"



//検索する文字列

search_str = "こんにちは"



//置換する文字列

rep_str = "Hello"



for i=0 to GETDIR(path, files)-1

	ID = FOPEN("<#DBL>" + path + GETDIR_FILES[i] + "<#DBL>", F_READ or F_WRITE)



	//テキストファイルの全内容を取得する

	content = FGET(ID, F_ALLTEXT)

	rep_content = REPLACE(content, search_str, rep_str)	

	FPUT(ID, rep_content, F_ALLTEXT)

	FCLOSE(ID)

next