[初步解决]请问findstr表达式配合set的通配符引用为什么会无效 - 无忧启动论坛

::replace.bat
@echo off
set dd=%DATE:~8,2%
set mm=%DATE:~5,2%
set yy=%DATE:~0,4%
set Tss=%TIME:~6,2%
set Tmm=%TIME:~3,2%
set Thh=%TIME:~0,2%
set Thh=%Thh: =0%
::ECHO %yy%%mm%%dd%-%Thh%%Tmm%%Tss%.txt
setlocal enabledelayedexpansion
REM orginalFile原始要操作的文件，单个文件。注：替换的文件中不能有冒号，否则结果不对。或者修改本脚本中for循环的delims=：中冒号为其他在文件中没有出现的符号，其中不能是等于号，<>需要加转义字符^，即写成delims=^<。
set orginalFile=Libraries.Info
REM outputFile指定替换字符串后，输出的文件
set outputFile=Libraries.Info.tmp
REM 最终文件
set finalOutFile=Libraries.Info
REM 设置程序所在
::set localadds=%~dp0test1\
set localadds=%~dp0
REM 要替换的原始字符串
::set oldStr=.\FL.Backups
set "oldStr=FL.Backups[ DISCUZ_CODE_0 ]quot;
REM 替换后的字符串
set newStr=%localadds%FL.Backups
REM 指定替换找到的第几个字符串，0是指全部替换
set /a number=1
:bakorg
copy %orginalFile% %orginalFile%.bak%yy%%mm%%dd%%Thh%%Tmm%%Tss%
goto replace
:replace
if exist %outputFile% del %outputFile%
set /a i=0
for /f "delims=" %%i in ('findstr /n .* %orginalFile%') do (
set "a=%%i"
set "a=!a:*:=!"
if "!a!"=="" (
set "b=!a!"
) else (
if %number% == 0 (
set "b=!a:%oldStr%=%newStr%!"
) else (
set "b=!a!"
if not "!a!" == "!a:%oldStr%=%newStr%!" (
set /a i+=1
if %number% == !i! (
set "b=!a:%oldStr%=%newStr%!"
)
)
)
)
REM 保留空白行，某行内容是空格或多个空格
echo.!b!>>%outputFile%
)
REM 临时文件改名删除源文件并输出结果文件
if exist %orginalFile% del %orginalFile%
::rename %orginalFile% %orginalFile%.bak
rename %outputFile% %finalOutFile%

复制代码

[LIBRARIES]
c:\FH.Backups
.\FL.Backups
d:\FH.Backups2
d:\FH.Backups5
d:\FH.Backups3
d:\FH.Backups20240403
H:\gr\FL.Backups

复制代码

rem 测试
:replace2
@echo off
setlocal enabledelayedexpansion
set "inputFile=Libraries.Info"
set "outputFile=Libraries.Info.tmp"
set "searchString=FL.Backups"
set "newPath=%localadds%FL.Backups"
if exist %outputFile% del %outputFile%
(for /f "tokens=*" %%a in ('type "%inputFile%"') do (
set "line=%%a"
set "modifiedLine="
set "tempLine="
for %%b in (!line!) do (
set "token=%%~b"
set "temp=!token:%searchString%=!"
if "!temp!"=="!token!" (
set "tempLine=!tempLine!%%~b "
) else (
set "tempLine=!tempLine!%newPath% "
)
)
rem Remove any leading and trailing non-alphanumeric characters from the line
set "tempLine=!tempLine:>*[^A-Za-z0-9]=!"
set "tempLine=!tempLine:~0,-1!"
echo !tempLine!
)) > "%outputFile%"
echo "Replacement complete."
endlocal
goto finalOutput

复制代码

@echo off
setlocal enabledelayedexpansion
set a="123456FL.Backups$7890"
set "searchString=FL.Backups$"
set newStr=####
set "b=!a:%searchString%=%newStr%!"
echo %b%
pause

复制代码

@echo off
setlocal enabledelayedexpansion
set "str1=FL.Backups"
set /a cnt=0
for /f "delims=" %%i in (1.txt) do (
call :find_replace "%%~i" "%str1%"
)
pause&GOTO:EOF
:find_replace
echo %~1|findstr /V "%str1%$" &&goto:EOF
set "str2=%~1"
set /a cnt+=1
set str2=%str2:!str1!=%
echo D:\test%cnt%\%str1%
goto:EOF

复制代码