went

for /r /d 参数的作用来了
dir是主文件夹,max是最大字节数
如果要递归处理子文件夹,使用第5行,把第6行REM起来

@echo off
setlocal enabledelayedexpansion
set "dir=D:\Notepad++"
set "max=5242880"
REM for /r "%dir%" /d %%i in ("*") do call :getFolderSize "%%i"
for /d %%i in ("%dir%\*") do call :getFolderSize "%%i"
pause&exit
:getFolderSize
set "size=0"
for /r "%~1" %%i in ("*") do ( set /a "size+=%%~zi" & if !size! gtr %max% goto :eof )
if !size! leq 1024 ( echo !size!B	%~1 & goto :eof )
if !size! leq 1048576 ( set /a "size/=1024" & echo !size!KB	%~1 & goto :eof )
set /a "size=!size!/1024/1024" & echo !size!MB	%~1 & goto :eof )
复制代码

went

回复 4# itunesis
set "dir=%~dp0"即可
生成dirList.txt,两位小数

@echo off
setlocal enabledelayedexpansion
set "dir=%~dp0"
set "max=5242880"
(
REM for /r "%dir%" /d %%i in ("*") do call :getFolderSize "%%i"
for /d %%i in ("%dir%*") do call :getFolderSize "%%i"
)>"%~dp0dirList.txt"
type "%~dp0dirList.txt"
echo ----------------------
echo out file: %~dp0dirList.txt
echo ----------------------
pause&exit

:getFolderSize
set "size=0"
for /r "%~1" %%i in ("*") do ( set /a "size+=%%~zi" & if !size! gtr %max% goto :eof )
if !size! leq 1024 ( set "unit=B" & goto :show )
if !size! leq 1048576 ( set "unit=KB" & set /a "size=!size!*100/1024" & set "size=!size:~0,-2!.!size:~-2!" & goto :show )
set "unit=MB" & set /a "size=!size!*100/1024/1024" & set "size=!size:~0,-2!.!size:~-2!"
:show
set "size=%size%%unit%          "
echo %size:~0,10% %~1
复制代码

went

看你意思是不用处理子文件夹

@echo off
setlocal enabledelayedexpansion
set "dir=%~dp0"
set "max=5242880"
( for /d %%i in ("%dir%\*") do call :getFolderSize "%%i" )>"%~dp0dirList.txt"
type "%~dp0dirList.txt"
echo ----------------------
echo out file: %~dp0dirList.txt
echo ----------------------
pause&exit

:getFolderSize
set "size=0"
for /r "%~1" %%i in ("*") do ( set /a "size+=%%~zi" & if !size! gtr %max% goto :eof )
echo %~nx1
复制代码