找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 25190|回复: 2

[文件操作] [已解决]批量除去文件名上指定的括号

[复制链接]
发表于 2019-5-7 21:44:47 | 显示全部楼层 |阅读模式
本帖最后由 qwop1209 于 2019-5-8 18:50 编辑

列现在有文件
文件名含特殊字符
[2017]12・・・3 (Ver.2018-01-16).rar
[2018]12◯3 (Ver.1.4) (*新文件).rar
[2018]78·3 (07) (Ver.1.0.12).rar
希望达到的效果
[2017]12・・・3 Ver.2018-01-16.rar
[2018]12◯3 Ver.1.4 (*新文件).rar
[2018]78·3 (07)  Ver.1.0.12.rar

只希望去带Ver.内容的括号
希望各位大佬有解决方法
发表于 2019-5-7 22:12:29 | 显示全部楼层
  1. @echo off
  2. set info=互助互利,支付宝扫码头像,感谢赞助
  3. rem 有问题,可加QQ956535081及时沟通
  4. title %info%
  5. cd /d "%~dp0"
  6. powershell -NoProfile -ExecutionPolicy bypass ^
  7.     $files=@(dir^|?{($_ -is [System.IO.FileInfo]) -and ($_.Name -ne '%~nx0')});^
  8.     for($i=0;$i -lt $files.Length;$i++){^
  9.         $newname=[regex]::replace($files[$i].BaseName,'\(Ver\.[^^\)]*?\)',{param($a);$a.value.trim('()')});^
  10.         $newfile=$newname+$files[$i].Extension;^
  11.         if($files[$i].Name -ne $newfile){^
  12.             $n=1;^
  13.             while(test-path -liter $newfile){^
  14.                 $newfile=$newname+'_'+$n.toString()+$files[$i].Extension;^
  15.                 $n++;^
  16.             };^
  17.             write-host ($files[$i].Name+' --^> '+$newfile);^
  18.             mv -liter $files[$i].Name $newfile;^
  19.         };^
  20.     };^
  21.     write-host '%info%' -ForegroundColor green;
  22. pause
复制代码
 楼主| 发表于 2019-5-8 18:51:26 | 显示全部楼层
回复 2# zaqmlp


    十分谢谢。已赞助。。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-19 05:58 , Processed in 0.015450 second(s), 7 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表