zaqmlp

@echo off
for /f "delims=" %%a in ('dir /ad /b "%~dp0"') do (
    md "%~dp0%%a\%%a\" 2>nul
    for /f "delims=" %%b in ('dir /a-d /b "%~dp0%%a\" 2^>nul') do move "%~dp0%%a\%%b" "%~dp0%%a\%%a\%%b"
    for /f "delims=" %%b in ('dir /ad /b "%~dp0%%a\" 2^>nul^|find /v "%%a"') do move "%~dp0%%a\%%b" "%~dp0%%a\%%a\"
)
pause
复制代码