星期三, 9月 23, 2015

利用Winrar來備份每天檔案至雲端

利用WinRAR 壓縮不同資料夾,備份至Synology


backup.bat裡
"C:\Program Files\WinRAR\WinRAR.exe" u -r -ibck -inul -m5 -agYYYYMMDD -ta20040403 F:\CloudStation\backup.rar @F:\CloudStation\list.txt ws.vbs

list.txt裡
F:\eVet5\

//執行RAR壓縮在list.txt裡的資料夾,壓縮名為當天日期把檔案放至f:\cloudStation\backup日期.rar

ws.vbs裡
Set fso = CreateObject("Scripting.filesystemobject") 
Set myfile = fso.getfolder("d:\CloudStation\").Files 
On Error Resume Next 
For Each x In myfile 
If Date - DateValue(Mid(x.Name, 6, 10)) < 7 Then 
Else 
fso.DeleteFile "D:\CloudStation\" & x.Name, True 
End If 
Next 

利用判斷超過一星期的檔案就會刪除(還在修改中2015.9.23)