Custom Search

Thursday, March 26, 2009

Get the folders from "C" Drive

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFldr = objFSO.GetFolder("C:\")
Set Fldrs = objFldr.SubFolders
For Each Fldr In Fldrs
WScript.Echo Fldr
Next

No comments:

Post a Comment

Note: Only a member of this blog may post a comment.