用VBS更简单: vbs代码: On Error Resume Next Dim Fso,TxtFl,Str Set Fso = CreateObject("Scripting.FileSystemObject") Set TxtFl = Fso.OpenTextFile ("文件位置",1) Str = Replace ( TxtFl.ReadAll,"被替换内容","替换内容") Set TxtFl = Fso.OpenTextFile ("文件位置",2) TxtFl.Write Str TxtFl.Close 批处理代码: @echo off >tmp.ini for /f "tokens=1* delims=:" %%i in ('findstr /n ".*" 文件位置') do ( if "%%j"=="" (echo.>>tmp.ini) else ( echo %%j|find "被替换内容">nul&&( call set tp=%%j&call echo %%tp:被替换内容=替换内容%%>>tmp.ini)||( >>tmp.ini echo %%j) ) ) copy tmp.ini 文件位置 /y >nul||(attrib -s -a -r -h 文件位置& copy tmp.ini 文件位置 /y >nul) del tmp.ini pause