主页 / server / 问题 / 49614
Accepted
Jeff Atwood
Asked: 2009-08-04 21:30:17 +0800 CST

删除早于 (x) 天的文件？

  • 772

什么是删除给定文件夹中超过 (n) 天的所有文件的好 Windows 命令行选项？

另请注意，这些文件可能有数千个，因此在这里forfiles使用 shellcmd并不是一个好主意。除非您喜欢生成数千个命令 shell。我认为这是一个非常讨厌的 hack，所以让我们看看我们是否可以做得更好！

理想情况下，Windows Server 2008 中内置（或易于安装）的东西。

windows command-line-interface

7 个回答

  1. Best Answer

    我环顾四周，发现了一种 powershell 方式：

    从指定文件夹中删除所有超过 8 天的文件（带预览）

    dir |? {$_.CreationTime -lt (get-date).AddDays(-8)} | del -whatif

    （删除 -whatif 使其发生）

    • 45

  2. 喜欢 Jeff 的 PowerShell 命令，但对于没有 PowerShell 的 Windows 机器的替代 vbs 解决方案，您可以尝试以下操作。

    另存为<filename>.vbs并执行： 

    <filename>.vbs <target_dir> <NoDaysSinceModified> [Action]

    第三个参数，[Action]可选。<NoDaysSinceModified>没有它，将列出比它更早的文件。设置为D它将删除早于<NoDaysSinceModified>

    例子 

    PurgeOldFiles.vbs "c:\Log Files" 8

    将列出c:\Log Files8 天前的所有文件

    PurgeOldFiles.vbs "c:\Log Files" 8 D

    将删除c:\Log Files超过 8 天的所有文件

    注意：这是SQLServerCentral.com上的 Haidong Ji 脚本的修改版本

    Option Explicit
on error resume next
    Dim oFSO
    Dim sDirectoryPath
    Dim oFolder
    Dim oFileCollection
    Dim oFile
    Dim iDaysOld
    Dim fAction

    sDirectoryPath = WScript.Arguments.Item(0)
    iDaysOld = WScript.Arguments.Item(1)
    fAction = WScript.Arguments.Item(2)
    Set oFSO = CreateObject("Scripting.FileSystemObject")
    set oFolder = oFSO.GetFolder(sDirectoryPath)
    set oFileCollection = oFolder.Files

If UCase(fAction) = "D" Then
'Walk through each file in this folder collection. 
'If it is older than iDaysOld, then delete it.
    For each oFile in oFileCollection
        If oFile.DateLastModified < (Date() - iDaysOld) Then
            oFile.Delete(True)
        End If
    Next
else
'Displays Each file in the dir older than iDaysOld
    For each oFile in oFileCollection
        If oFile.DateLastModified < (Date() - iDaysOld) Then
            Wscript.Echo oFile.Name & " " & oFile.DateLastModified
        End If
    Next
End If


'Clean up
    Set oFSO = Nothing
    Set oFolder = Nothing
    Set oFileCollection = Nothing
    Set oFile = Nothing
    Set fAction = Nothing
    • 7

  3. 不是真正的命令行，但我喜欢使用LINQPad作为 C# 脚本主机：（
    这只是给了我一个命令行 C# 脚本的想法 à la vbs 文件）

    var files = from f in Directory.GetFiles(@"D:\temp", "*.*", SearchOption.AllDirectories)
            where File.GetLastWriteTime(f) < DateTime.Today.AddDays(-8)
            select f;

foreach(var f in files)
    File.Delete(f);
    • 4

  4. 看看这个http://sourceforge.net/projects/delold因为这是我使用的。

    简单但有效。delold -d 14删除当前文件夹中超过 14 天的文件。

    • 4

  5. 使用 cygwin 的（或其他替代方法）“查找”命令可以实现类似的功能。但这需要您安装 cygwin 或手头有便携式版本。

    • 3

  6. 我在 powershell 之前使用的另一种选择：

    http://lifehacker.com/133190/geek-to-live--hard-drive-janitor

    • 2

  7. 我使用 autoIT 在我的系统上完成此任务。我喜欢您可以轻松地将 .au3 文件编译为 exe。引入安全漏洞不像任何人都可以编辑的 bat 文件那样容易。

    • 2

相关问题