[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off
  2. set info=互助互利,支付宝扫码头像,感谢赞助
  3. rem 有问题,可加QQ956535081及时沟通
  4. title %info%
  5. cd /d "%~dp0"
  6. powershell -NoProfile -ExecutionPolicy bypass ^
  7.     $fd='归类';^
  8.     [void](md $fd -force);^
  9.     $folders=@(dir^|?{($_.Name -ne $fd) -and ($_ -is [System.IO.DirectoryInfo])});^
  10.     for($i=0;$i -lt $folders.length;$i++){^
  11.         $file=@(dir -liter $folders[$i].FullName -r^|?{@('.xlsx' -contains $_.Extension) -and ($_ -is [System.IO.FileInfo])});^
  12.         for($j=0;$j -lt $file.length;$j++){^
  13.             $n=1;^
  14.             $newname=$file[$j].Name;^
  15.             $newfile=$fd+'\'+$newname;^
  16.             while(test-path -liter $newfile){^
  17.                 $newname=$file[$j].BaseName+'('+$n.toString()+')'+$file[$j].Extension;^
  18.                 $newfile=$fd+'\'+$newname;^
  19.                 $n++;^
  20.             };^
  21.             write-host ($file[$j].FullName+' --^> '+$newfile);^
  22.             mv -liter $file[$j].FullName $newfile;^
  23.         };^
  24.     }
  25. echo;%info%
  26. pause
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表