[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off
  2. cd /d "%~dp0"
  3. for /r /d %%A in (*) do (
  4.   call :rentemp "%%A"
  5. )
  6. pause
  7. exit /b
  8. :rentemp
  9. setlocal enabledelayedexpansion
  10. pushd "%~1"|| goto end
  11. set n=0
  12. for /f "delims=" %%A in ('2^>nul dir /a-d /b') do (
  13.   if !n! equ 0 (
  14.     set "newname=%~nx1%%~xA"
  15.   ) else (
  16.     set "newname=%~nx1(!n!)%%~xA"
  17.   )
  18.   set /a n+=1
  19.   if not "!newname!"=="%%A" (
  20.     if exist "!newname!" (
  21.       call :getTempName
  22.       @REM echo ren "%%A" "!tempname!"
  23.      >nul 2>nul ren "%%A" "!tempname!" && set "templist[!n!]=%%A/!tempname!/!newname!"
  24.     ) else (
  25.       echo ren "%%A" "!newname!"
  26.       ren "%%A" "!newname!"
  27.     )
  28.   )
  29. )
  30. REM 重命名临时列表
  31. for /f "tokens=1* delims==" %%A in ('2^>nul set templist[') do (
  32.   for /f "tokens=1-3 delims=/" %%C in ("%%B") do (
  33.     echo ren "%%C" "%%E"
  34.     ren "%%D" "%%E"
  35.   )
  36. )
  37. popd
  38. :end
  39. endlocal
  40. exit /b
  41. :getTempName
  42. :loop
  43. set tempname=~%random%~
  44. if exist "%tempname%" goto loop
  45. @REM echo tempname=%tempname%
  46. exit /b
复制代码
微信:flashercs
QQ:49908356

TOP

返回列表