服務(wù)器中如何根據(jù)創(chuàng)建日期和訪問日期清理文件

小編給大家分享一下服務(wù)器中如何根據(jù)創(chuàng)建日期和訪問日期清理文件，希望大家閱讀完這篇文章之后都有所收獲，下面讓我們一起去探討吧！

葉集網(wǎng)站制作公司哪家好，找創(chuàng)新互聯(lián)建站！從網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、成都響應(yīng)式網(wǎng)站建設(shè)公司等網(wǎng)站項(xiàng)目制作，到程序開發(fā)，運(yùn)營(yíng)維護(hù)。創(chuàng)新互聯(lián)建站于2013年開始到現(xiàn)在10年的時(shí)間，我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn)，來保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)建站。

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")

看完了這篇文章，相信你對(duì)“服務(wù)器中如何根據(jù)創(chuàng)建日期和訪問日期清理文件”有了一定的了解，如果想了解更多相關(guān)知識(shí)，歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道，感謝各位的閱讀！

當(dāng)前題目：服務(wù)器中如何根據(jù)創(chuàng)建日期和訪問日期清理文件
分享路徑：http://muchs.cn/article4/ijdjie.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供建站公司、品牌網(wǎng)站制作、云服務(wù)器、全網(wǎng)營(yíng)銷推廣、企業(yè)建站、標(biāo)簽優(yōu)化

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)