Solved

Directory/folder utility

Posted on 2007-04-11
3
156 Views
Last Modified: 2010-04-18
Is there a utility out there that can go through a drive/directories and list the name of directories, the total size of the directories and other attribute such as last modified or even what type files are within the directories, etc?
0
Comment
Question by:bigd563
3 Comments
 
LVL 30

Expert Comment

by:LauraEHunterMVP
ID: 18890289
Take a look at DumpSec (www.somarsoft.com), a utility which we often recommend for requests like this one.

You can also use your own VBScripts to dump out the information you're looking for; take a look at the sample scripts on the Technet Script Repository to get you started: http://www.microsoft.com/technet/scriptcenter/scripts/default.mspx?mfr=true
0
 
LVL 67

Expert Comment

by:sirbounty
ID: 18890300

Hello bigd563,
Something like this will do it...


'FindAllFiles.vbs
Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject")
Dim objOutput:Set objOutputFile = objFSO.CreateTextFile("C:\Output.log")
Dim dtOld

strSourceFolder = "C:\Testing" 'starting folder...will recurse downward from here

ProcessFolder objFSO.GetFolder(strSourceFolder)

With objOutput
  .WriteLine
  .WriteLine "Process completed at " & Now
  .WriteLine "==========================="
  .Close
End With

Set objOutputFile = Nothing
Set objFSO = Nothing
wscript.quit


Sub ProcessFolder(strSource)
  ProcessFiles strSource
  For Each fld In strSource.SubFolders
    ProcessFolder fld
  Next
End Sub

Sub ProcessFiles(strSrc)
  For Each file In strSrc.Files
    objOutput.WriteLine objFSO.GetExtensionName(file.name) & "," & file & "," & file.size & "," & file.datecreated & "," & file.datelastmodified & "," & file.datelastaccessed
  End If
  Next
End Sub

~sirbounty
0
 
LVL 70

Accepted Solution

by:
KCTS earned 500 total points
ID: 18890662
0

Featured Post

Netscaler Common Configuration How To guides

If you use NetScaler you will want to see these guides. The NetScaler How To Guides show administrators how to get NetScaler up and configured by providing instructions for common scenarios and some not so common ones.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Preface Having the need * to contact many different companies with different infrastructures * do remote maintenance in their network required us to implement a more flexible routing solution. As RAS, PPTP, L2TP and VPN Client connections are no…
by Batuhan Cetin In this article I will be guiding through the process of removing a failed DC metadata from Active Directory (hereafter, AD) using the ntdsutil tool in a Windows Server 2003 environment. These steps are not necessary in a Win…
Along with being a a promotional video for my three-day Annielytics Dashboard Seminor, this Micro Tutorial is an intro to Google Analytics API data.
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…

911 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

19 Experts available now in Live!

Get 1:1 Help Now