a6236130 当前离线
二级士官
for /r %%a in (*) do call :MvFile "%%~a" pause exit :MvFile if "%~f1"=="%~f0" goto :eof set "Str=%~n1" if not exist "%Str:~0,3%" md "%Str:~0,3%" move "%~1" "%Str:~0,3%\" goto :eof 复制代码
评分人数
aloha20200628 当前离线
少校
@echo off &for /f "delims=" %%F in ('dir /b/s/a-d') do if /i "%~f0" neq "%%F" ( set "nF=%%~nF" &setlocal enabledelayedexpansion &md "!nF:~0,3!" 2>nul move /y "%%F" "!nF:~0,3!\" &endlocal) pause&exit/b复制代码
TOP
smss 当前离线
中尉
@echo off setlocal enabledelayedexpansion for /r %%a in (*) do ( if not "%%a"=="%~f0" ( set "file=%%a" set "folder=%%~dpa!file:~0,3!" if not exist "!folder!" md "!folder!" move "%%a" "!folder!\" >nul ) ) pause复制代码
@echo off &for /f "delims=" %%F in ('dir /b/s/a-d') do if /i "%~f0" neq "%%F" ( set "nF=%%~nF" &setlocal enabledelayedexpansion &md "%%~dpF!nF:~0,3!" 2>nul move /y "%%F" "%%~dpF!nF:~0,3!\" &endlocal) pause&exit/b复制代码
发表于 2025-3-16 14:58
| 
感谢大哥，是我要的效果！