[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 hfxiang 于 2022-11-3 08:53 编辑

测试一下用gawk( http://bcn.bathome.net/tool/4.1.0/gawk.exe )来处置,以下脚本在win10下工作正常:
  1. @echo off
  2. cd /d "%~dp0"
  3. dir/s/b/a-d|gawk "match($0,/(^.+\\)([^\\]+)\.([0-9]+)$/,arr){++i;b[i]=arr[2];c[i]=arr[3];d[i]=$0;if(f[arr[2]]+0<arr[3]){f[arr[2]]=arr[3]}}END{for(j=1;j<=i;j++)if(!(f[b[j]]==c[j])){print \"del \" \"\\\"\" d[j] \"\\\"\"}}"|cmd.exe
  4. dir/s/b/a-d|gawk "match($0,/(^.+\\)([^\\]+)\.([0-9]+)$/,arr){print \"move /Y \\\"\" $0 \"\\\" \\\"\" arr[1] arr[2] \".1\" \"\\\"\"}"|cmd.exe
复制代码

TOP

想不明白了,改了多次啦,还是楼主来试试吧。bat文件保存为ANSI编码:
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "delims=" %%i in ('dir /b /a-d ^|findstr /e "\.[1-9][0-9]*"') do (
  4.     set m=%%~xi
  5.     set m=!m:.=!
  6.     if not "%%~ni"=="!str1!" (
  7.         if defined str1 ren "!str1!!str2!" "!str1!.1"
  8.         set /a n=m
  9.         set str1=%%~ni
  10.         set str2=%%~xi
  11.     ) else (
  12.         if !m! gtr !n! (
  13.             set /a n=m
  14.             del "!str1!!str2!"
  15.             set str2=%%~xi
  16.         ) else (
  17.             del "%%i"
  18.         )
  19.     )
  20. )
  21. ren "!str1!!str2!" "!str1!.1"
  22. pause
复制代码
未经测试,请楼主自测。

TOP

返回列表