34 lines
969 B
Batchfile
34 lines
969 B
Batchfile
|
@echo off
|
||
|
|
chcp 65001 >nul
|
||
|
|
setlocal enabledelayedexpansion
|
||
|
|
|
||
|
|
:: 获取当前目录
|
||
|
|
set "currentDir=%cd%"
|
||
|
|
|
||
|
|
:: 循环当前目录下的所有文件夹
|
||
|
|
for /d %%D in (*) do (
|
||
|
|
:: 获取文件夹名的第一个字母
|
||
|
|
set "folderName=%%~nxD"
|
||
|
|
set "firstLetter=!folderName:~0,1!"
|
||
|
|
|
||
|
|
:: 检查文件夹名是否是单字母命名，如果是则跳过
|
||
|
|
if "!folderName!" neq "!firstLetter!" (
|
||
|
|
:: 将第一个字母转换为小写（如有需要）
|
||
|
|
for %%A in (a b c d e f g h i j k l m n o p q r s t u v w x y z) do (
|
||
|
|
if /I "!firstLetter!"=="%%A" set "firstLetter=%%A"
|
||
|
|
)
|
||
|
|
|
||
|
|
:: 创建目标文件夹（如果不存在）
|
||
|
|
if not exist "!currentDir!\!firstLetter!" (
|
||
|
|
mkdir "!currentDir!\!firstLetter!"
|
||
|
|
)
|
||
|
|
|
||
|
|
:: 移动文件夹到相应的字母文件夹中
|
||
|
|
move "!currentDir!\%%D" "!currentDir!\!firstLetter!\"
|
||
|
|
echo move "!currentDir!\%%D"
|
||
|
|
)
|
||
|
|
)
|
||
|
|
|
||
|
|
echo 文件夹分类完成
|
||
|
|
pause
|