[文件操作] 如何把名称中有部分相同字符串的文件移动到以该字符串命名的文件夹？

@echo off
set "fo=C:\test\a&b"
for /f "tokens=1* delims=_" %%a in ('dir /a-d/b "%fo%\*_*.*"') do if not exist "%%a" md "%fo%\%%a"
for /d %%a in ("%fo%\*") do if exist "%%a_*" move "%%a_*" "%%a"
for /f "delims=" %%a in ('dir /a-d/b "%fo%\*.*"') do (
    if not exist "%fo%\%%~na" md "%fo%\%%~na"
    move "%fo%\%%a" "%fo%\%%~na"
)
pause
复制代码

@echo off
set "fo=%cd%"
for /f "tokens=1* delims=_" %%a in ('dir /a-d/b "%fo%\*_*.*"') do if not exist "%%a" md "%fo%\%%a"
for /d %%a in ("%fo%\*") do if exist "%%a_*" move "%%a_*" "%%a"
for /f "delims=" %%a in ('dir /a-d/b "%fo%\*.*"') do (
    if not exist "%fo%\%%~na" md "%fo%\%%~na"
    move "%fo%\%%a" "%fo%\%%~na"
)
pause
复制代码