[文件操作] 【已解决】批处理如何对相同文件名的文件保留最新修改时间的文件？

星空独子

在指定文件夹及其子文件夹下对相同文件名的文件保留最新创建时间的文件（相同文件名的文件在不同的子文件夹中，但是创建时间是不一样)

zaqmlp

@echo off
mode con lines=3000
set info=互助互利,支付宝扫码头像,感谢打赏
rem 有问题,可加QQ956535081及时沟通
title %info%
set "folder=%~dp0"
cd /d "%folder%"
powershell -NoProfile -ExecutionPolicy bypass ^
    $dic=New-Object 'System.Collections.Generic.Dictionary[string,Object]';^
    $files=@(dir -liter '%folder%' -recurse^|?{($_.Name -ne '%~nx0') -and ($_ -is [System.IO.FileInfo])});^
    for($i=0;$i -lt $files.length;$i++){^
        $fname=$files[$i].Name.toLower();^
        if(-not $dic.ContainsKey($fname)){^
            [System.Collections.ArrayList]$arr=@();^
            $dic.add($fname, $arr);^
        };^
        [void]$dic[$fname].add($files[$i]);^
    };^
    foreach($i in $dic.keys){^
        $list=@($dic[$i]^|sort {$_.LastWriteTime} -des);^
        write-host $list[0].FullName -ForegroundColor green;^
        for($i=1;$i -lt $list.length;$i++){^
            write-host $list[$i].FullName -ForegroundColor red;^
            del -liter $list[$i].FullName -force;^
        };^
        write-host '';^
    };
:end
echo;%info%
pause
exit
复制代码

xczxczxcz

so easy  让后面的大神给你写吧！

星空独子

回复 2# zaqmlp


运行代码，出现无限循环

zaqmlp

回复 4# 星空独子

已修改

terse

可试一下 replace /u /s参数

flashercs

当前目录和子目录

<#*,:&cls
@echo off
pushd "%~dp0"
Powershell -NoProfile -ExecutionPolicy RemoteSigned -Command ". ([ScriptBlock]::Create((Get-Content -LiteralPath \"%~0\" -ReadCount 0 | Out-String ))) "
popd
pause
exit /b
#>
Get-ChildItem -Recurse -Force | Where-Object { -not $_.PSIsContainer } | Sort-Object -Descending -Property CreationTime |`
  Group-Object -Property PSChildName | ForEach-Object {
  for ($i = 1; $i -lt $_.Count; $i++) {
    Remove-Item -LiteralPath $_.Group[$i].PSPath -Force -Verbose
  }
}
复制代码