Five66

不知这样行不行,放到包含ABCD四个文件夹的文件夹里运行

@echo off&pause
set fd=%date:/=-%-%random%
md %fd%
if %errorlevel% neq 0 echo can not new folder&pause&exit/b
for /l %%i in (1,1,100) do (
set /a aaa=%%i+1000
set bbb=%%i
setlocal enabledelayedexpansion
if not exist "!fd!\!aaa:~1!" md "!fd!\!aaa:~1!"
for %%a in (A B C D) do (
move "%%a\%%a!bbb!" "!fd!\!aaa:~1!\%%a!bbb!"
)
endlocal
)

echo done&pause
explorer %fd%
复制代码