What's in the eBook?
- Full list of reasons for poor performance
- Ultimate measures to speed things up
- Primary web monitoring types
- KPIs you should be monitoring in order to increase your ROI
Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.BrowseForFolder (0, "Select The Folder To Enumerate :", (0)) If objFolder Is Nothing Then Wscript.Quit Else Set objFolderItem = objFolder.Self objPath = objFolderItem.Path End If Set objFso = CreateObject("Scripting.FileSystemObject") Set objFolder = objFso.GetFolder(objPath) For each objFolder.SubFolders in objFolder Next For each objFile in objFolder.Files if objFile.DateLastModified < Date()-8 Then msgBox "Found file: " & objFile.Name End If Next
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.