中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-05 12:55 		共 48,038 主题排行 / 350,123 发帖 / 今日 1 篇 / 48,251 会员排行
DOS批处理 & 脚本技术（批处理室） » 如何获得文件夹大小?
可打印版本 　835 / 2
第1楼　dongheng 发表于 2007-08-12 13:29
初级用户　发帖 13　积分 45
如何获得文件夹大小?
如何获得A文件夹和B文件夹大小,并将两个文件夹大小相减,以KB为单位显示结果?
第2楼　1112yuhua 发表于 2007-08-12 17:51
初级用户　发帖 44　积分 106
@echo off & setlocal enabledelayedexpansion
set /p A=输入第一个文件夹:
set /p B=输入第二个文件夹:
FOR /F "delims==" %%i IN ('dir /b/s !A!\') DO set /a size1+=%%~zi
set /a a=!size1!/1024
FOR /F "delims==" %%i IN ('dir /b/s !B!\') DO set /a size2+=%%~zi
set /a b=a-!size2!/1024
echo !b:-=!KB
pause

只能算个大概。
第3楼　zerocq 发表于 2007-08-12 23:27
中级用户　发帖 196　积分 458
Function ShowFolderSize(filespec)
Dim fso, f, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(filespec)
s = UCase(f.Name) & " uses " & f.size & " bytes."
ShowFolderSize = s
End Function
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023