• <u id="4wg44"><form id="4wg44"></form></u>
  • <big id="4wg44"><table id="4wg44"><div id="4wg44"></div></table></big>
  • 自動(dòng)刪除超過10天的文件及文件夾的vbs代碼
    來源:易賢網(wǎng) 閱讀:1645 次 日期:2016-07-18 11:50:09
    溫馨提示:易賢網(wǎng)小編為您整理了“自動(dòng)刪除超過10天的文件及文件夾的vbs代碼”,方便廣大網(wǎng)友查閱!

    自動(dòng)刪除超過10天的文件及文件夾vbs,主要是針對一些沒有用的文件夾。

    代碼如下:

    option explicit

    dim fpath,fso,logfile,fwrite

    fpath=inputbox ("輸入目標(biāo)文件夾","文件處理器")

    logfile="logfile.txt"

    set fso=createobject("scripting.filesystemobject")

    Set fwrite=fso.opentextfile(logfile,8,true)

    getfilename fpath

    fwrite.close

    Set fso=Nothing

    MsgBox "命令執(zhí)行完成!"

    function getfilename(path)

    dim file,folder,sfolder,fname,subfolder,Files

    if not fso.folderexists(path) then

    set fso=nothing

    msgbox "目標(biāo)文件夾不存在!"

    exit function

    end if

    set folder=fso.getfolder(path)

    set files=folder.files

    for each file in Files

    fwrite.writeline path&"\"&file.name

    If file.DateLastModified < Now - 10 Then '判斷是否超過10天

    fso.DeleteFile(file)

    'Wscript.Echo file

    End If

    next

    set subfolder=folder.subfolders

    for each sfolder in subfolder

    fwrite.writeline path&"\"&sfolder.name

    If sfolder.DateCreated < Now - 10 Then '判斷是否超過10天

    fso.deletefolder(sfolder)

    'Wscript.Echo file

    End If

    next

    end function

    將上面代碼存為vbs文件即可使用。

    更多信息請查看腳本欄目
    易賢網(wǎng)手機(jī)網(wǎng)站地址:自動(dòng)刪除超過10天的文件及文件夾的vbs代碼
    由于各方面情況的不斷調(diào)整與變化,易賢網(wǎng)提供的所有考試信息和咨詢回復(fù)僅供參考,敬請考生以權(quán)威部門公布的正式信息和咨詢?yōu)闇?zhǔn)!

    2025國考·省考課程試聽報(bào)名

    • 報(bào)班類型
    • 姓名
    • 手機(jī)號(hào)
    • 驗(yàn)證碼
    關(guān)于我們 | 聯(lián)系我們 | 人才招聘 | 網(wǎng)站聲明 | 網(wǎng)站幫助 | 非正式的簡要咨詢 | 簡要咨詢須知 | 加入群交流 | 手機(jī)站點(diǎn) | 投訴建議
    工業(yè)和信息化部備案號(hào):滇ICP備2023014141號(hào)-1 云南省教育廳備案號(hào):云教ICP備0901021 滇公網(wǎng)安備53010202001879號(hào) 人力資源服務(wù)許可證:(云)人服證字(2023)第0102001523號(hào)
    云南網(wǎng)警備案專用圖標(biāo)
    聯(lián)系電話:0871-65099533/13759567129 獲取招聘考試信息及咨詢關(guān)注公眾號(hào):hfpxwx
    咨詢QQ:526150442(9:00—18:00)版權(quán)所有:易賢網(wǎng)
    云南網(wǎng)警報(bào)警專用圖標(biāo)