Windows Server 2008使用計劃任務每天定時執行vbs文件

某臺服務器上,數據庫每天的備份文件有好多GB,如果不定期刪除,會很快佔滿硬盤空間。
所以需要一個定時任務,每天自動運行,定期執行刪除掉一些備份文件。

下面爲完整的過程。

1、準備好刪除文件的腳本 oldfiledelete.vbs,下面文件是刪除D:\dbbak目錄裏面創建日期爲10天前的文件

Dim fso, f, f1, fc, s ,ff ,strFilePath 

strFilePath="D:\dbbak" 
Set fso = CreateObject("Scripting.FileSystemObject") 
Set f = fso.GetFolder(strFilePath) 
Set fc = f.Files 

For Each f1 in fc 
Set ff = fso.GetFile(strFilePath & "\" & f1.name) 
if DateDiff("d",ff.DateCreated,now)>10 then 
ff.Delete 
end if 
Next

Set fso = Nothing 
Set f = Nothing 
Set f = Nothing 
Set ff = Nothing

2、點擊開始菜單--計劃任務程序,打開後,右鍵“任務計劃程序庫”--創建任務,輸入名稱,並勾選下面的幾個選項(不管用戶是否登錄都要運行、不存儲密碼、使用最高權限運行)。

3、點擊“觸發器”選項,根據實際需要配置,這裏配置的是每天執行一次。

4、點擊“操作”選項,在“程序或腳本”中瀏覽選擇第1步vbs腳本的全路徑,"起始於(可選)"輸入vbs所在目錄。
本人“程序或腳本”路徑:C:\BackupScript\oldfiledelete.vbs
"起始於(可選)":C:\BackupScript

確定後,列表會出現一條任務。

 上面配置默認是每天執行一次,如果想要現在就執行,可以右鍵這條任務,會出現6個選項,點第1個的“運行”即可。

 

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章