[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 zaqmlp 于 2019-4-23 02:45 编辑
  1. @echo off
  2. mode con lines=3000
  3. set info=互助互利,支付宝扫码头像,感谢赞助
  4. rem 有问题,可加QQ956535081及时沟通
  5. title %info%
  6. cd /d "%~dp0"
  7. powershell ^
  8.     $list=dir *-*.txt^|?{$_ -is [System.IO.FileInfo]}^|group {$_.BaseName -replace '\d+$'};^
  9.     foreach($item in $list){^
  10.         $arr=@($item.group^|sort {[int]($_.BaseName -replace '^^.+-','')});^
  11.         $max=$arr[$arr.length-1].BaseName -replace '^^.+-','';^
  12.         for($i=0;$i -lt $arr.length;$i++){^
  13.             $num=$arr[$i].BaseName -replace '^^.+-','';^
  14.             $four=-join(($arr[$i].BaseName.split('-')[0])[-4..-1]);^
  15.             $str='['+$max.PadLeft(2,'0')+'_'+$num.PadLeft(2,'0');^
  16.             if($i -eq 0){^
  17.                 $str+='_A]';^
  18.             }else{^
  19.                 if($i -eq ($arr.length-1)){^
  20.                     $str+='_B]';^
  21.                 }else{^
  22.                     $str+=']';^
  23.                 };^
  24.             };^
  25.             write-host ($arr[$i].Name+' --^> ['+$four.toUpper()+']'+$str+$arr[$i].Name);^
  26.             mv -liter $arr[$i].Name ('['+$four.toUpper()+']'+$str+$arr[$i].Name);^
  27.         };^
  28.     }
  29. echo;%info%
  30. pause
复制代码
1

评分人数

提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 3# czvde

我测试时结果是这样,不知你贴出的结果哪里来的
已增加了4位大写字符
话说,要是超过100,数值怎么表示
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 6# czvde

大概我用到了假系统
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 8# czvde

赞助实际点
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表