![](/uploads/1/2/6/2/126257783/660255607.jpg)
![Vbscript list files in folder Vbscript list files in folder](http://cdn.career.guru99.com/wp-content/uploads/2016/09/File_type_Extension_83-512.png)
Here is a script that may be helpful that I threw together for looking at potential SMS or SCCM backlogs. This will count any files under the specified directory and any subdirectory, without listing the actual files, just counts. Would be helpful if you're just looking for where the big pockets of files are hiding.If you're wondering, the inboxmon.log can be helpful in this case, but used this script to find out what other files could be hiding in the inboxes.Hope you find this useful.Option ExplicitDim fsSet fs = CreateObject('scripting.filesystemobject')' Count files in the directory by Arguments' Syntax: listcount.vbs (FolderName)if wscript.arguments.count.
So, please add some files (any file with any extension) in the folder and add this code. Option Explicit Sub FSOExample Dim fso As New FileSystemObject ' Create the object. Dim sFolder, sFile As String sFolder = 'D: myPhotoAlbum' ' The folder I wish to check if exists. Counting all the files and directories including sub folders in a given path. Vb.net how to copy file from one Directory to another directory by create the folder if that folder is not exists. Files count in folder and sub folders. FTP Sub Folders - get files from sub folders also.
![](/uploads/1/2/6/2/126257783/660255607.jpg)