Display All the Subfolders Within a Folder Using VBscript

Display All the Subfolders Within a Folder Using VBscript

You can use VBscript’s Filesystemobject to list all the subfolders in a folder. Create a text file called showfolderlist.vbs and enter the following code:

showfolderlist eg showfolderlist "c:windows"

The Showfolderlist procedure uses the Filesystemobject to traverse through all the subdirectories and display them:

Sub ShowFolderList(folderspec)    Dim fs, f, f1, fc, s    Set fs = CreateObject("Scripting.FileSystemObject")    Set f = fs.GetFolder(folderspec)    Set fc = f.SubFolders    For Each f1 in fc        s = s &         s = s &  vbCrLf    Next    MsgBox sEnd Sub

To run the program, just double-click on the showfolderlist.vbs file.

See also  5 Tips for Choosing the Right Medical Software for Your Practice

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist