[文件操作] [已解决]批处理怎样将文件按照前缀统一分类？

@echo off
REM 设置前缀字符串长度
set PreLen=9

cd /d "%~dp0"
setlocal enabledelayedexpansion
for %%a in (*) do (
    if /i "%%~xa" neq ".bat" (
        if not exist "%%~xa" (
            md "%%~xa"
        )
        move /y "%%a" "%%~xa\"
    )
)
for /f "delims=" %%i in ('dir /b /ad .*') do (
    echo 正在处理文件夹：%%i
    pushd "%%i"
    for /f "delims=" %%j in ('dir /b /a-d') do (
        set "FileName=%%j"
        set "FolderName=!FileName:~0,%PreLen%!"
        if not exist "!FolderName!" (
            md "!FolderName!"
        )
        move /y "%%j" "!FolderName!\"
    )
    popd
)
复制代码