bat处理文件 替换字段
发布网友
发布时间：2022-04-24 05:02
共1个回答
热心网友
时间：2023-08-08 00:42
哈哈哈!像这样的难题当然只有我控盘惨大王才能回答的出来啦!请看代码:
@ECHO OFFTITLE 处理中...
COLOR A
::===设置区===
::
set "file=web.js"
::指定要处理的文件.
set "wd=ccc"
::指定要查找的字符串.
set "rwd=aaa"
::如果查找到这个字符串,将它替换为...
::
::===设置区===
set "nf=NewFile(%random%-%random%-%random%-%random%-%random%-%random%-%random%)%file%"
set fso=CreateObject("Scripting.FileSystemObject")
findstr /c:"%wd%" "%file%">nul
if "%errorlevel%"=="1" goto ok
mshta.exe VBScript:%fso%.CreateTextFile("%nf%",True).Write(Replace(%fso%.OpenTextFile("%file%",1).ReadAll,"%wd%","%rwd%"))(Close)
for /f %%i in ("%file%") do set fn=%%~nxi
del /s /q /f "%file%">nul
rename "%nf%" "%fn%">nul
taskkill /f /im "mshta.exe">nul
:ok
cls
TITLE 处理完毕!
echo 处理完毕!
pause>nul
