[已解决]批处理怎样实现相似文件名校对只留最新文件删除其余文件？

511182890

AD1021-G1101-AA-110-主副背料-四向-820.dxf--------------------------------------创建日期2015-8-7 17：10
AD1021-G1101-AA-110-主副背料-四向-821.dxf--------------------------------------创建日期2015-8-7 17：12
AD1021-G1101-AA-110-主副背料-四向-(0000)-821.dxf-----------------------------创建日期2015-8-7 17：15
AD1021-G1101-AA-110-主副背料-四向-(00100)-821.dxf---------------------------创建日期2015-8-7 17：18
AD1021-G1101-AA-110-主副背料-四向-(000f0)-821.dxf----------------------------创建日期2015-8-7 17：20
求大神来条代码，上面这些文件我要求执行代码之后，只留下《创建日期2015-8-7 17：20》这条，对比前面“AD1021-G1101-AA-110-主副背料-四向”有规率的6项5个“-”，这六项相同的情况下，第六个“-”开始不对比，删除只剩余最晚创建的文件。
我有很多的文件及文件夹，不同文件夹中没有相似的文件，只有在同一个文件中有相似的文件，只要保留一个最新的文件，其余的删除。

511182890

把对比前面相同之后，根据创建日期时间删除老的文件。我需要把BAT文件放在《座套DXF》这个文件夹下，所以需要包含所有子目录

AD1021-G1101-AA-110-主副背料-四向-820.dxf--------------------------------------创建日期2015-8-7 17：10
AD1021-G1101-AA-110-主副背料-四向-821.dxf--------------------------------------创建日期2015-8-7 17：12
AD1021-G1101-AA-110-主副背料-四向-(0000)-821.dxf-----------------------------创建日期2015-8-7 17：15
AD1021-G1101-AA-110-主副背料-四向-(00100)-821.dxf---------------------------创建日期2015-8-7 17：18
AD1021-G1101-AA-110-主副背料-四向-(000f0)-821.dxf----------------------------创建日期2015-8-7 17：20
求大神来条代码，上面这些文件我要求执行代码之后，只留下《创建日期2015-8-7 17：20》这条，对比前面“AD1021-G1101-AA-110-主副背料-四向”有规率的6项5个“-”，这六项相同的情况下，第六个“-”开始不对比，删除只剩余最晚创建的文件。
我有很多的文件及文件夹，同一个文件夹中没有相似的文件，只有在同一个文件中有相似的文件，只要保留一个最新的文件，其余的删除。

pcl_test

1. @echo off
   
2. md "筛选结果\" 2>nul
   
3. for /f "tokens=1-6* delims=-" %%a in ('dir /a-d /b /tc /o-d *.dxf') do (
   
4.     if not exist "筛选结果\%%a-%%b-%%c-%%d-%%e-%%f*.dxf" (
   
5.         copy "%%a-%%b-%%c-%%d-%%e-%%f-%%g" "筛选结果\" /y
   
6.     )
   
7. )
   
8. pause

复制代码

回家路上

参考楼上写个练手

1. 
   
2. @echo off & setlocal enabledelayedexpansion
   
3. md "筛选结果\" 2>nul
   
4. for /f "tokens=1-6* delims=-" %%a in ('dir /a-d /b /od *.dxf') do set "##%%a-%%b-%%c-%%d-%%e-%%f=%%a-%%b-%%c-%%d-%%e-%%f-%%g"
   
5. for /f "tokens=2 delims==" %%a in ('set ##') do copy %%a "筛选结果\" /y
   
6. pause & exit /b
   

复制代码

511182890

回复 2# pcl_test


    我有几千个文件夹，50W+的文件，这样不行，只是复制单独的出来，还是要手动去删除。

pcl_test

回复 4# 511182890

复制出来有误没？没的话，一句del或rd也就能全删了

511182890

回复 5# pcl_test


    不对的，这个只能在同文件夹下执行，我是要包括子文件夹的，我加上了/b /s就变成复制原有文件了

pcl_test

回复 6# 511182890

“不对”是什么意思？是指没有“包括子文件夹”，还是没有找出最晚创建的文件？然你为什么不说清楚清楚“包括子文件夹”？如果是要“包括子文件夹”，那么是找出每个文件夹里的最晚创建的文件，还是找出所有文件夹里的最晚创建的文件？你都问过那么多问题，怎么到现在连个问题都还不会说明？

511182890

回复 7# pcl_test


   你的代码，放在有文件的文件夹中是可以复制的，如果放在上一层文件夹中，就不会复制。
我是有很多文件及很多文件夹，不同文件夹中没有相似的文件，只有在同一个文件夹中的文件有可能会相似，所以要保留一个最新的文件。

pcl_test

回复 8# 511182890

因为你顶楼并没有说“包括子文件夹”，所以当然不可以，要实现也简单，for /r 或是for /f …in ('dir /s…')都可以遍历文件夹

慕夜蓝化

1. 
   
2. echo off
   
3. setlocal enabledelayedexpansion
   
4. for /f "delims=" %%i in ('dir /s/b/l/ad') do (
   
5.     for /f "delims=" %%a in ('dir /b /l /aa /o-d "%%i\*.dxf"') do (
   
6.         set/aa+=1
   
7.         if !a! neq 1 del /f/q "%%i\%%a"
   
8.      )
   
9.     set/aa=0
   
10. )
    
11. pause
    

复制代码

511182890

回复 10# 慕夜蓝化


    不行，结果这样的

1. 
   
2. C:\Documents and Settings\Administrator\桌面\新建文件夹 (2)>echo off
   
3. 找不到文件
   
4. 请按任意键继续. . .

复制代码

511182890

回复 9# pcl_test


    帮忙改个完整的。谢谢，

xudaweb

既然只有在同一个文件夹才有相似的文件，感觉只要取最新的就可以了，不用比对前缀了吧？

1. @echo off
   
2. for /f "delims=" %%i in ('dir /b /a /od *.dxf') do (
   
3.         set "the_latest=%%i"
   
4. )
   
5. copy %the_latest% %the_latest%.BAK
   
6. del *.dxf
   
7. ren %the_latest%.BAK %the_latest%
   
8. pause>nul

复制代码

回家路上

预测，你再不上执行样本，你的这个问题的三个帖子要被标记为水军了。
各种各样的回答，都不正确。我都不信了。

发帖的时候，把之前关联的链接也发一下呗。

你这需求还是复制第一个。。。。。。然后就循环了。