求助！如何将文件名相同部分替换为别的，批量重命名

@璐村惂鐢ㄦ埛_000076K馃惥 off
chcp 65001 > nul
setlocal enabledelayedexpansion
for %%a in (*.mp4) do (
:: 检查文件名是否包含要找的字符串
echo %%~na | findstr /C:"1080p.HD国语中字无水印[66影视http://www.66Ys.Co]" > nul
if %errorlevel% equ 0 (
:: 原文件名
set "filename=%%~na"
:: 原文件扩展名
set "extension=%%~xa"
:: 替换目标字符串为"大院"
set "newname=!filename:1080p.HD国语中字无水印[66影视http://www.66Ys.Co]=大院!"
:: 改名
ren "%%a" "!newname!!extension!"
)
)
endlocal
lk1179306749