[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. <# :
  2. cls&echo off&cd /d "%~dp0"&mode con lines=5000
  3. powershell -NoProfile -ExecutionPolicy bypass "Get-Content -literal '%~f0'|Out-String|Invoke-Expression"
  4. pause
  5. exit
  6. #>
  7. $folder=@(
  8. ".\111\222"
  9. );
  10. for($i=0;$i -lt $folder.length;$i++){
  11.     if(test-path -literal $folder[$i]){
  12.         $files=@(dir -literal $folder[$i] -recurse|sort {$_.FullName.length} -Descending);
  13.         for($j=0;$j -lt $files.length;$j++){
  14.             $fn=$files[$j].Name -replace ' ','';
  15.             $base=$files[$j].BaseName  -replace ' ','';
  16.             $filepath=$files[$j].FullName -replace '\\[^\\]+$','';
  17.             if($fn -ne $files[$j].Name){
  18.              $newname=$fn;
  19.              $newfile=$filepath+'\'+$newname;
  20.              $n=2;
  21.              while(test-path -literal $newfile){
  22.              $newname=$fn+'('+$n.ToString()+')';
  23.              if($files[$j] -is [System.IO.FileInfo]){
  24.              $newname=$base+'('+$n.ToString()+')'+$files[$j].Extension;
  25.              }
  26.              $newfile=$filepath+'\'+$newname;
  27.              $n++;
  28.              }
  29.              write-host ($files[$j].FullName+' --> '+$newname);
  30.              rename-item -literal $files[$j].FullName $newname;
  31.             }
  32.         }
  33.     }else{write-host ('"'+$folder[$i]+'" Not Found')}
  34. }
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表