Hi,
I have the following script to delete files and folders older than 7 days. It work but I need to be able to go through subfolders as well:
Set objFSO = CreateObject("Scripting.FileSystemObject")Set objFolder = objFSO.GetFolder("C:\FTPRoot_External")ForEach file in objFolder.FilesIf DateDiff("d", file.DateLastModified, Now) > 7 Then objFSO.DeleteFile(file)EndIfNextForEach folder in objFolder.SubFoldersIf DateDiff("d", file.DateLastModified, Now) > 7 Then objFSO.DeleteFolder(folder)EndIfNext
Any suggestions?
Thanks.