VBscript to get the size of folder size, You can put it in the loop to get the list of folder size.

dim oFS, oFolder
set oFS = WScript.CreateObject(“Scripting.FileSystemObject”)
 set oFolder = oFS.GetFolder( “FolderPath”)
 wscript.echo oFolder.Name & ” : ” & round(oFolder.Size/1024/1024,2)