[已解决]批处理把图片重命名并move到二级目录下然后删除三级目录

wpy4206

求助：三级目录内的图片重命名（用三级目录文件夹名称，添加序号）并move到二级目录下，然后删除三级目录

实例：

D:\123\JC001\SSS,下有图片若干，名称无规律
D:\123\JC002\SSS,下有图片若干，名称无规律
D:\123\JC003\SSS,下有图片若干，名称无规律
......

处理后

D:\123\JC001 目录内：SSS(1).JPG,，SSS(2).JPG,，SSS(3).JPG.....
D:\123\JC002 目录内：SSS(1).JPG,，SSS(2).JPG,，SSS(3).JPG.....
D:\123\JC003 目录内：SSS(1).JPG,，SSS(2).JPG,，SSS(3).JPG.....
......


说明：二级目录下，D:\123\JC001，原有的图片不变（名称和路径都不变）


感谢两位的热心帮助！

WHY

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. for /f "delims=" %%i in ('dir /b /a-d /s D:\123\*.jpg ^| findstr /i "D:\\123\\[^\\]*\\[^\\]*\\[^\\]*$"') do (
   
4.         if not "!s!" == "%%~dpi" (
   
5.                 set n=1
   
6.                 if defined s echo; rd /s /q "!s!"
   
7.         ) else (set /a n+=1)
   
8.         for %%j in ("%%~dpi.") do echo;move "%%i" "%%~fj(!n!)%%~xi"
   
9.         set "s=%%~dpi"
   
10. )
    
11. if defined s echo; rd /s /q "!s!"
    
12. pause

复制代码

wpy4206

回复 2# WHY


    代码有点复杂，没看懂，我测试了，分别放在一级目录下，二级目录下，都提示找不到文件。

WHY

D:\123
改成你的真实的目录名，D:\\123也改成真实的目录名（注意是双斜杠）

wpy4206

回复 4# WHY


    我的目录就是D盘下，123文件夹（一级目录）啊

WHY

Microsoft Windows [版本 10.0.16299.64]
(c) 2017 Microsoft Corporation。保留所有权利。

C:\Users\WHY>dir /b /a-d /s D:\123\*.jpg
D:\123\img110.jpg
D:\123\JC001\sss\105.jpg
D:\123\JC001\sss\106.jpg
D:\123\JC001\sss\107.jpg
D:\123\JC002\img110 - 副本.jpg
D:\123\JC002\sss\345720170221013.jpg
D:\123\JC002\sss\567820170421010.jpg
D:\123\JC003\img101.jpg
D:\123\JC003\abc\img109 - 副本.jpg
D:\123\JC003\abc\img110 - 副本.jpg

C:\Users\WHY>E:\Test\Test.bat
move "D:\123\JC001\sss\105.jpg" "D:\123\JC001\sss(1).jpg"
move "D:\123\JC001\sss\106.jpg" "D:\123\JC001\sss(2).jpg"
move "D:\123\JC001\sss\107.jpg" "D:\123\JC001\sss(3).jpg"
rd /s /q "D:\123\JC001\sss\"
move "D:\123\JC002\sss\345720170221013.jpg" "D:\123\JC002\sss(1).jpg"
move "D:\123\JC002\sss\567820170421010.jpg" "D:\123\JC002\sss(2).jpg"
rd /s /q "D:\123\JC002\sss\"
move "D:\123\JC003\abc\img109 - 副本.jpg" "D:\123\JC003\abc(1).jpg"
move "D:\123\JC003\abc\img110 - 副本.jpg" "D:\123\JC003\abc(2).jpg"
rd /s /q "D:\123\JC003\abc\"
请按任意键继续. . .

我这里没有问题。

wpy4206

回复 6# WHY


    运行和你显示的是一样，但是文件都没有变化呢

wpy4206

求大神看下二楼的跟帖，我测试了不行啊

ivor

回复 1# wpy4206
powershell 脚本:
功能：以当前文件为基准，只移动深度三层目录下所有JPG图片至二层目录,然后删除空目录

1. 
   
2. foreach ($dir in @(dir .\*\*\*))
   
3. {
   
4.     $count = 0
   
5.     foreach ($file in @(dir $dir))
   
6.     {
   
7.         if ($file.Extension -eq ".jpg"){
   
8.             if (! $file.PSIsContainer){
   
9.                 if ($dir.Parent){
   
10.                     $count += 1
    
11.                     $new_file = -Join($dir.name,"(",$count,")",$file.Extension)
    
12.                     $dest = -Join(".",$dir.Parent.Parent,"",$dir.Parent,"",$new_file)
    
13.                     $file.Moveto($dest)
    
14.                     write-host 正在移动：$file
    
15.                     if( (Get-ChildItem $dir | Measure-Object).Count -eq 0) {
    
16.                         rd $dir
    
17.                         write-host 删除目录：$dir
    
18.                     }
    
19.                 }
    
20.             }
    
21.         }
    
22.     }
    
23. }

复制代码

WHY

回复 7# wpy4206


    你应该知道 echo; 的作用吧？把它删掉好了。

wpy4206

回复 10# WHY


    感谢你的耐心恢复，删掉结果一样没有变化，还是运行显示的有

wpy4206

回复 9# ivor


    测试了没有反应，是另存bat运行吗

ivor

回复 12# wpy4206

好吧，现在可以存为bat文件运行此代码了。

1. <# :
   
2. @echo off
   
3. rem 增强代码兼容性,代码保存为 ".bat"、".cmd"、".ps1"均可执行
   
4. powershell Set-ExecutionPolicy -ExecutionPolicy RemoteSigned
   
5. more +8 %~f0 > %~dpn0.ps1
   
6. powershell %~dpn0.ps1
   
7. del %~dpn0.ps1&pause&exit /b
   
8. #>
   
9. foreach ($dir in @(dir .\*\*\*))
   
10. {
    
11.     $count = 0
    
12.     foreach ($file in @(dir $dir))
    
13.     {
    
14.         if ($file.Extension -eq ".jpg"){
    
15.             if (! $file.PSIsContainer){
    
16.                 if ($dir.Parent){
    
17.                     $count += 1
    
18.                     $new_file = -Join($dir.name,"(",$count,")",$file.Extension)
    
19.                     $dest = -Join(".",$dir.Parent.Parent,"",$dir.Parent,"",$new_file)
    
20.                     $file.Moveto($dest)
    
21.                     write-host 正在移动：$file
    
22.                     if( (Get-ChildItem $dir | Measure-Object).Count -eq 0) {
    
23.                         rd $dir
    
24.                         write-host 删除目录：$dir
    
25.                     }
    
26.                 }
    
27.             }
    
28.         }
    
29.     }
    
30. }

复制代码

wpy4206

回复 13# ivor


    测试成功，非常感谢

WHY

1. $arr = dir D:\123\*\*\*.jpg | ?{$_ -is [IO.FileInfo]};
   
2. $arr | ForEach{
   
3.     If($fd -ne $_.Directory.FullName){
   
4.         $n = 0;
   
5.         If(Test-Path Variable:fd){rd -LiteralPath $fd -Recurse -Force}
   
6.     }
   
7.     $fd = $_.Directory.FullName;
   
8.     mv -LiteralPath $_.FullName -Des ($fd + '(' + (++$n) + ').jpg') -Force;
   
9. }
   
10. If(Test-Path Variable:fd){rd -LiteralPath $fd -Recurse -Force}

复制代码