可以删除指定天数文件的vbs脚本-创新互联

本篇内容介绍了“可以删除指定天数文件的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



“可以删除指定天数文件的vbs脚本”的内容就介绍到这里了,感谢大家的阅读。如果想了解更多行业相关的知识可以关注创新互联网站,小编将为大家输出更多高质量的实用文章!


本文标题:可以删除指定天数文件的vbs脚本-创新互联
文章地址:http://myzitong.com/article/ejosg.html