中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 如何获得文件夹大小?

dongheng
初级用户

积分 45
发帖 13
注册 2007-4-15
状态离线

『楼主』: 如何获得文件夹大小?

如何获得A文件夹和B文件夹大小,并将两个文件夹大小相减,以KB为单位显示结果?

2007-8-12 13:29

1112yuhua
初级用户

积分 106
发帖 44
注册 2007-6-1
状态离线

『第 2 楼』:

@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

只能算个大概。

2007-8-12 17:51

(463675828)

zerocq
中级用户

积分 458
发帖 196
注册 2006-10-5
状态离线

『第 3 楼』:

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

2007-8-12 23:27

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: