首页 windows Windows自动批量删除几小时、天、月前的旧文件

Windows自动批量删除几小时、天、月前的旧文件

Windows自动批量删除几小时、天、月前的旧文件

需求:

有的时候我们需要Windows定期自动删除一些旧的文件,比如海豚自己使用的时候,由于一些文件是时时备份到云的,所以不太喜欢旧文件占用本地的空间,所以需要每过一段时间,就自动删除没有用的旧文件了。

JS代码:

这是,我们使用脚本来完成,因为脚本算是自动化里边最简单又好用的东西了,代码如下:

dim folder, file, mFSO
Set oArgs = WScript.Arguments
if oArgs.Count = 0 then
    MsgBox "错误:需要参数   格式 DeleteFile.vbs e:\VBSTest\Log"
end if
 
Set mFSO = CreateObject("Scripting.FileSystemObject")
set folder=mFSO.GetFolder(oArgs(0))
 
dim df
For Each file In folder.files
    'df=DateDiff("h",file.DateCreated,Now)    '判断建立日期
    df=DateDiff("h",file.DateLastModified,Now)    '判断修改日期
    If (df>1) Then    '5小时前的文件
        file.Delete()
    End If
Next
 
Set oArgs = Nothing

关于代码的一些简单解释也写在了上边,大家可以自己学习交流,关于这个脚本,首先新建一个文本,存进去,然后另存为.vbs

Windows自动批量删除几小时、天、月前的旧文件

当然,单有这个也是可以运行的,但增加一个bat批处理会更加方便,bat的代码如下:

@ ECHO OFF

::标签 begin
:begin

::TIMEOUT 等待指定时间命令,注意:TIMEOUT命令在XP等系统上不受支持
TIMEOUT /T 900

::执行显示系统信息 systeminfo 命令
de.vbs C:\Users\Administrator\Pictures\webpic\xx

::跳转到 begin 标签处执行
GOTO begin

 

好了,上面的代码也是写到记事本里,另存为.bat文件即可,使用的时候双击打开bat文件就可以了。

点赞(0) 打赏

打赏作者

您的支持,是我们最大的动力!

评论

电子邮件地址不会被公开。 必填项已用*标注