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

[文件操作] 请教大神!使用BAT如何批量去掉目录下所有文件夹中所有文件名中的括号和括号里的内容

请教各位大神!!!使用BAT如何批量去掉目录下所有文件夹中所有文件名中的括号和括号里的内容!!!  

通过本站帖子学习到了如何去除文件夹里所有文件名中的括号及相关内容, 但是不知道如何对目录下所有文件夹中的文件进行操作。

以下帖子中的代码:
http://www.bathome.net/thread-55719-1-1.html
  1. @echo off
  2. for /f "tokens=1* delims=(" %%i in ('dir /b "*(*)*.txt"') do (
  3. if "%%j"=="" ( set "a=%%i" & set "pre=" ) else ( set "a=%%j" & set "pre=%%i" )
  4. call set "txt=%%pre%%(%%a%%"
  5. call set "a=%%a:*)=%%"
  6. call echo rename "%%txt%%" "%%pre%%%%a%%"
  7. call rename "%%txt%%" "%%pre%%%%a%%"
  8. echo -----
  9. )
  10. pause&exit
复制代码

我修改了一下, 发现这样子在运行后点任意键,每点击一下就可以找到子文件夹里所有对应的MP4文件,但是程序并没有重命名
  1. @echo off
  2. for /f "tokens=1* delims=(" %%i in ('dir /b /a-d /s "*(*)*.mp4"') do (
  3. if "%%j"=="" ( set "a=%%i" & set "pre=" ) else ( set "a=%%j" & set "pre=%%i" )
  4. call set "txt=%%pre%%(%%a%%"
  5. call set "a=%%a:*)=%%"
  6. call echo rename "%%txt%%" "%%pre%%%%a%%"
  7. call rename "%%txt%%" "%%pre%%%%a%%"
  8. echo -----
  9. )
  10. pause&exit
复制代码

TOP

  1. @Powershell -version 3 -NoLogo -c "& {[ScriptBlock]::Create("'#' + ([io.file]::ReadAllText('%~f0',[text.encoding]::Default))").Invoke()}" & pause & exit
  2. $files = [io.directory]::GetFiles("./","*.mp4","All");
  3. foreach($file in $files)
  4. {
  5.     $name = Split-Path -Path $file -Leaf;
  6.     $new_name = $name -replace '\(.*\)','';
  7.     Rename-Item -Path $file -NewName $new_name;
  8. }
复制代码
QQ 33892006

TOP

回复 3# yhcfsr


  这个可以哟!! 感谢大神指教。 还能用这种指令。 我再仔细看看代码

TOP

正则方便
  1. //&cls&@ dir /s /b "*(*)*.mp4"| CScript -NoLogo -E:JScript "%~0" &pause&exit
  2. var fso=new ActiveXObject("Scripting.FileSystemObject");
  3. var file=null;
  4. var newName=null;
  5. while (!WScript.StdIn.AtEndOfStream){
  6. try{
  7. file=fso.GetFile(WScript.StdIn.ReadLine());
  8. newName=file.Name.replace(/\(.*?\)/g,"");
  9. WSH.Echo(file.Path+"\n"+newName);
  10. file.Name=newName;
  11. WSH.Echo("success!");
  12. }catch(e){
  13. WSH.Echo("failed:"+e.message);
  14. } finally {
  15. WSH.Echo("--------------------------------");
  16. }
  17. }
复制代码

TOP

回复 1# Pathos


@echo off
for /f "delims=" %%x in ('dir /b /s /ad') do (
    pushd "%%x"
    for /f "tokens=1* delims=(" %%i in ('dir /b "*(*)*.txt"') do (
        if "%%j"=="" ( set "a=%%i" & set "pre=" ) else ( set "a=%%j" & set "pre=%%i" )
        call set "txt=%%pre%%(%%a%%"
        call set "a=%%a:*)=%%"
        call echo rename "%%txt%%" "%%pre%%%%a%%"
        call rename "%%txt%%" "%%pre%%%%a%%"
        echo -----
    )

    popd
)
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 5# went


    学习到了学习到了! 我试试

TOP

回复 6# Batcher


    感谢感谢  我试一下

TOP

返回列表