Browse by Tags

סקריפט למחיקת קבצים ישנים, בעלי סיומת נתונה
24 May 11 05:57 PM | yuval14 | with no comments

Dim fso, foldername, filenametodelete Set fso = CreateObject("Scripting.FileSystemObject") Set foldername = fso.GetFolder("C:\Program Files\Microsoft SQL Server\MSSQL10_50.MSSQLSERVER\MSSQL\DATA\") For each filenametodelete in foldername.Files if datediff("d", filenametodelete.DateLastModified, now()) >3 and right(filenametodelete.Path, 4) = ".trc" then fso.DeleteFile filenametodelete.Path End If On Error Resume Next Next The script using a few steps: 1...

תגים:VBS, Scrips