中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-08-02 00:25
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 求助~! 查看 1,168 回复 11
楼 主 求助~! 发表于 2006-09-09 10:07 ·  中国 福建 厦门 电信
初级用户
积分 36
发帖 12
注册 2006-09-08 18:40
19年会员
UID 62153
性别 男
状态 离线
如何判断一个文件夹大于500M 就清空?


什么写。请高手赐招。:P
QQ群名称:◥◣批处理时代◢◤
QQ群号码:6702314
2 发表于 2006-09-10 00:02 ·  中国 江苏 苏州 电信
银牌会员
★★★
积分 1,181
发帖 533
注册 2006-08-14 12:54
19年会员
UID 60484
状态 离线
dir/a/s 应该能查出总量,比如这样的。

所列文件总数:
4883 个文件 1,155,276,674 字节
746 个目录 3,041,497,088 可用字节

有数量后应该可以做了吧。
3 发表于 2006-09-10 01:57 ·  中国 广东 佛山 广东睿江科技有限公司
荣誉版主
★★★★
batch fan
积分 5,226
发帖 1,737
注册 2006-03-10 00:38
20年会员
UID 51697
来自 成都
状态 离线
  NaturalJ0提到了思路,那我就来一段代码吧。

  要注意的是,因为CMD进行运算有取值范围的限制,所以对取到的字节数的最后三位作了抛弃处理,得到的结果是个近似值,一般是取到的字节数越大,误差越小,500M左右的文件夹,其误差可以忽略不计:

@echo off
set size=0
setlocal enabledelayedexpansion
for /f "tokens=3" %%i in ('dir /a /s /-c "文件夹"^|findstr "个文件"') do (
set size_=%%i
set /a size=!size_!+!size!
)
set /a size=%size%/2
set /a size=%size:~0,-3%/1049
if %size% gtr 500 rd "文件夹" && md "文件夹"


[ Last edited by namejm on 2006-9-10 at 01:59 ]
尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。
4 发表于 2006-09-10 23:19 ·  中国 湖北 荆门 电信
荣誉版主
★★★
积分 2,013
发帖 718
注册 2006-02-18 07:07
20年会员
UID 50550
状态 离线
Re namejm:
个人认为不必把size单位转换为MB,直接把500MB转换为字节比较似乎可以简略点,因为用if … GTR … 结构不存在set /a的限制。

另:
我们几个版主失职,亏得有你们这么多热心朋友支持这个版块,没啥说的,个人给你加上个20分表示感谢。
5 发表于 2006-09-11 06:18 ·  中国 广东 佛山 广东睿江科技有限公司
荣誉版主
★★★★
batch fan
积分 5,226
发帖 1,737
注册 2006-03-10 00:38
20年会员
UID 51697
来自 成都
状态 离线
Re 3742668:

  首先对你给我加20分表示感谢。

  从回复这么多帖子的过程中,我不仅练了手脚,也学到了很多东西。能用批处理帮别人解决一些工作上的问题,让我感到很高兴。我感觉这是一个回帖→解决别人问题→提高自己写代码的水平→回更具有挑战性的帖→用更简洁更多样化的方法解决别人的问题→……这样一个不断提高的过程,我想很多人都会乐在其中的。

  看到你说可以不用转换为MB,因为用if … GTR … 结构不存在set /a的限制这句话,我感觉这样处理对以后写代码非常具有实用价值。为了稳妥起见,我测试了一些数据,却在无意中发现CMD在进行数据的比较的时候,还是会受到字节长短的限制,似乎数字位数超过10就会出错。比如在下的两段代码中,执行第一段会显示yes,执行第二段会显示no。
  1、
if 1234567898 gtr 1234567897 (echo yes) else (echo no)

  2、
if 12345678998 gtr 12345678997 (echo yes) else (echo no)
尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。
6 发表于 2006-09-11 06:51 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
修改一下namejm的:
@echo off
for /f "tokens=3" %%i in ('dir /a /s /-c "文件夹"^|findstr "个文件"') do set size=%%i
set /a size=%size%/1048576
if %size% gtr 500 rd "文件夹" && md "文件夹"


set size=%%i
只取“dir /s”最后所列文件总数的总字节
7 发表于 2006-09-11 07:29 ·  中国 广东 佛山 广东睿江科技有限公司
荣誉版主
★★★★
batch fan
积分 5,226
发帖 1,737
注册 2006-03-10 00:38
20年会员
UID 51697
来自 成都
状态 离线
  嘿嘿,zxcv的代码充分利用了for的特性,应该是最简洁的了。

  只是字节数换算成MB的时候,不能直接除以1048576,这个地方应该引起重视,因为如果字节数太大的话,很可能就超出了CMD处理的范围。
尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。
8 发表于 2006-09-11 08:37 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
嘿嘿,我试了2095748268字节(1998M)都没问题,所以才确定这样处理


补充:
测试出“set /a size=”数字变量计算最大为 2147483647(2048M)(2的31次方-1)
“set /a size=”的除数 /n 最大也为 2147483647(2048M)(2的31次方-1)

以上XP SP1通过

[ Last edited by zxcv on 2006-9-11 at 11:26 ]
9 发表于 2006-09-11 08:59 ·  中国 广东 佛山 广东睿江科技有限公司
荣誉版主
★★★★
batch fan
积分 5,226
发帖 1,737
注册 2006-03-10 00:38
20年会员
UID 51697
来自 成都
状态 离线
  呵呵,1998M没问题,并不代表都没问题啊,你看看我在5楼的测试就知道了。

  其实,set使用双字节存储整数,有32位的存贮范围限制(引willsort语),如果数字不在2^-31~2^31-1这个范围,CMD就不能正确地对它进行运算了。

  类似的帖子有:如何显示磁盘的剩余空间?
尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。
10 发表于 2006-09-11 09:05 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
确实如此

不过对于楼主,估计基本够用了

不行的将“set /a size=%size%/1048576”改为“set /a size=%size:~0,-3%/1049”就行了

更正一下:
“set size=”应该不受限,“set /a size=”受2^32-1限制,2^31~2^32-1之间得出“set /a size=%size%”为%size%-4294967296的负数

[ Last edited by zxcv on 2006-9-11 at 11:28 ]
11 发表于 2006-09-11 09:35 ·  中国 广东 佛山 广东睿江科技有限公司
荣誉版主
★★★★
batch fan
积分 5,226
发帖 1,737
注册 2006-03-10 00:38
20年会员
UID 51697
来自 成都
状态 离线
Originally posted by zxcv at 2006-9-11 09:05:
而且如果大于2^32-1,“set size=”也是无效的,也就不能进行“set /a size=”计算


  所以要对后三位数字作抛弃处理。

  现在我发现我那段代码也有问题,除2之前就应该对数字做处理的。还是用你的代码比较好一点,不过要直接抛弃后三位。

[ Last edited by namejm on 2006-9-12 at 00:29 ]
尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。
12 发表于 2006-09-13 02:03 ·  中国 江苏 苏州 电信
中级用户
★★
过度热情
积分 321
发帖 139
注册 2006-03-21 17:19
20年会员
UID 52521
性别 男
状态 离线
刚做了个vbs的给大家分享.........


Function ShowFolderSize(filespec)
Dim fso, f, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(filespec)
s = UCase(f.Name) &" uses " & FormatNumber(f.size/(1024*1024),2) & " MB."
wscript.echo s
If FormatNumber(f.size/(1024*1024),2)>=500.00 then
wscript.echo "the file is over size"
fso.DeleteFolder(filespec)
End If
End Function
知识在于不断积累
论坛跳转: