服务器中如何根据创建日期和访问日期清理文件

小编给大家分享一下服务器中如何根据创建日期和访问日期清理文件，希望大家阅读完这篇文章之后都有所收获，下面让我们一起去探讨吧！

叶集网站制作公司哪家好，找创新互联建站！从网页设计、网站建设、微信开发、APP开发、成都响应式网站建设公司等网站项目制作，到程序开发，运营维护。创新互联建站于2013年开始到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联建站。

Function FilesTree(sPath)
    Set oFso = CreateObject("Scripting.FileSystemObject")
    Set oFolder = oFso.getfolder(sPath)
    Set oSubFolders = oFolder.SubFolders
      
    Set oFiles = oFolder.Files
    For Each oFile In oFiles
        'WScript.Echo oFile.Path
        'oFile.Delete
        
        fcdate = oFile.DateCreated
        fadata = oFile.DateLastAccessed
        
        If DateDiff("d", fcdate, fadata) > 0 Then 'after created, having accessed.
            If DateDiff("d", fadata, Now) > 90 Then
                oFile.Delete
            End If
        Else
            If DateDiff("d", fcdate, Now) > 90 Then
                oFile.Delete
            End If
        End If
    Next
      
    For Each oSubFolder In oSubFolders
        'WScript.Echo oSubFolder.Path
        'oSubFolder.Delete
        FilesTree (oSubFolder.Path) '
    Next
      
    Set oFolder = Nothing
    Set oSubFolders = Nothing
    Set oFso = Nothing
End Function
  
FilesTree ("D:\Share")

看完了这篇文章，相信你对“服务器中如何根据创建日期和访问日期清理文件”有了一定的了解，如果想了解更多相关知识，欢迎关注创新互联行业资讯频道，感谢各位的阅读！

当前题目：服务器中如何根据创建日期和访问日期清理文件
分享路径：https://www.cdcxhl.com/article4/ijdjie.html

成都网站建设公司_创新互联，为您提供建站公司、品牌网站制作、云服务器、全网营销推广、企业建站、标签优化

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联