一个可以删除指定天数文件的vbs脚本

时间:2021-03-17 人气:0

想了解一个可以删除指定天数文件的vbs脚本的相关内容吗，在本文为您仔细讲解的相关知识和一些Code实例，欢迎阅读和指正，我们先划重点：一个可以删除指定天数文件的vbs脚本，下面大家一起来学习吧。

Const FilePath = "E:\log" '定义目录 

Set FSO = CreateObject("Scripting.FileSystemObject") 
ShowSubfolders FSO.GetFolder(filepath) 
Sub ShowSubFolders(Folder) 
  For Each Subfolder in Folder.SubFolders 
    Set Files = subfolder.Files 
     If Files.Count <> 0 Then 
     For Each File In Files 
           If File.DateLastModified < Now - 30 Then   '判断是否超过30天 
                 FSO.DeleteFile(Subfolder.Path & "\" & File.Name) '删除 
                 'Wscript.Echo Subfolder.Path & "\" & File.Name     '显示    
           End If 
           Next 
     End If 
     ShowSubFolders Subfolder 
  Next 
End Sub 

加载全部内容