WHY

楼主就这么轻描淡写的一问，要么是考虑不周，要么就是故意挖坑让人跳
如果重命名时出现重名的情况，你打算怎么办？
如果文件夹名全部由数字组成，你打算怎么办？

WHY

回复 8# happy886rr


    不是我打击你，你的“增强版”并没有增强。

动不动就来个“完美版”、“增强版”，下一次要不要来个“绝世无双”版呢？

WHY

如果文件夹重名，在文件夹后面补上 _A、_B ..._Z
同一文件夹中最多允许27次重复的子文件夹

@echo off
set "s=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"
for /f "delims=" %%i in ('dir /b /s /ad^|findstr "[^\\]*[0-9][^\\]*$"^|sort /r') do (
    set "name=\%%~nxi"
    cd /d "%%~dpi"
    setlocal enabledelayedexpansion
    for /l %%j in (0 1 9) do set "name=!name:%%j=!"
    set "newName=!name!"
    for %%j in (%s%) do (
        if exist ".!newName!" set "newName=!name!_%%j"
    )
    for %%j in ("!newName:~1!") do (
        endlocal
        ren "%%i" "%%~nxj"
    )
)
pause
复制代码

WHY

PowerShell可以这样：

dir -Include *[0-9]* -Recurse | ?{$_ -is [System.IO.DirectoryInfo]} | `
Sort FullName -Desc | %{
    $Path = $_.FullName -replace '(.+\\).+$', '$1'
    $Name = $_.Name -replace '\d+', ''
    $n = 0; $NewName = $Name
    while(test-Path -LiteralPath ($Path + $NewName)) {
        $n1 = [math]::Truncate($n/26) + 65
        $n2 = $n % 26 + 65; $n += 1
        $NewName = $Name + '_' + [char][int]$n1 + [char]$n2
    }
    move -LiteralPath $_.FullName -Dest ($Path + $NewName)
}
复制代码