WHY

PowerShell 代码

$srcDir = 'E:\Test';   #源目录
$keyWord = 'GMSMM90';  #关键字

$arr = dir ($srcDir + '\' + $keyWord + '[a-z][0-9][0-9].doc') -Recurse | ?{$_ -is [IO.FileInfo]}
$arr | ForEach {
    $name = $_.Name;
    $chr = $name.SubString($keyWord.Length, 1).ToUpper();
    $int = [int][char]$chr;
    $int = $int + 1 - [int][Math]::Floor($int/90)*26;
    $name = $keyWord + [char]$int + $name.SubString($keyWord.Length + 1);
    ren -LiteralPath $_.FullName -NewName $name -Force -WhatIf;
}
复制代码

WHY

@echo off & setlocal enabledelayedexpansion
rem 原目录
set "srcDir=E:\test"
rem 关键字
set "key=GMSMM90"

for %%i 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 A) do (
    set "_!s!=%%i" & set "s=%%i"
)

for /f "delims=" %%i in ('dir /b /a-d /s "%srcDir%\%key%*.doc"^|findstr /i "\\%key%[a-z][0-9][0-9]\.doc$"') do (
    set "name=%%~nxi"
    set "s=!name:*%key%=!"
    for %%j in ("!s:~0,1!") do echo;ren "%%i" "%key%!_%%~j!!s:~1!"
)
pause
复制代码