中国DOS联盟

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

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

游客注册登录会员网志搜索命令提示符 Bash 上传统计

中国DOS联盟论坛
现在时间是 2026-08-02 22:33

欢迎新会员 hello8888666　 RSS
共 48,038 主题排行 / 350,123 发帖 / 今日 1 篇 / 48,251 会员排行不转换/ 简体中文/ 繁體中文（台灣）/ 繁體中文（香港）

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 获取的文件大小能进行数值操作吗? 查看 882　回复 2

楼主 获取的文件大小能进行数值操作吗? 发表于 2006-12-27 20:17　·　中国四川成都电信

sureme

新手上路

★

积分 16
发帖 6
注册 2006-12-27 06:16
19年会员
UID 74676
性别男

状态离线

继续昨天提出的问题,需求解答
详细描述:
先附注上昨天发布的问题(红色为昨天提出的问题,已经得到解决)
急救,DOS获取文件大小

需求:现有两个文件,D:\35.RMVB,D:\35OK.RMVB,判断这两个文件大小是否一致,如果大小一致则删除D:\35.RMVB.
请给予帮助，小弟万分感谢。
第一次发贴，不足之处海涵。

新的问题:程序需要判断两个文件大小相差多少,如果相差的值<1000000字节则删除D:\35.RMVB.即35.RMVB的大小-35OK.RMVB的大小<1000000则删除D:\35.RMVB.

还请DX不吝赐教,或者提供更好的解决办法.目前由于特殊情况只能采用DOS下解决这个问题.

[ Last edited by sureme on 2006-12-27 at 07:23 AM ]

第 2 楼发表于 2006-12-27 20:24　·　中国四川成都电信

sureme

新手上路

★

积分 16
发帖 6
注册 2006-12-27 06:16
19年会员
UID 74676
性别男

状态离线

我先顶上去,DX们看看哈

第 3 楼发表于 2006-12-27 20:50　·　中国辽宁联通

jmz573515

银牌会员

★★★

积分 1,212
发帖 464
注册 2006-12-13 21:11
19年会员
UID 73417
性别男

状态离线

用VBS写的.
具体内容请自行更改.(如文件,相差大小.)



Set fso=CreateObject("scripting.filesystemobject")

Set a=fso.GetFile ("d:\11.txt")

azj=a.Size

Set b=fso.getFile("d:\11k.txt")

bzj=b.Size

MsgBox azj &"    "&bzj&"     "&bzj-azj '这一行可以删除

If bzj-azj>1000 Then        '两个文件的相差值大于1000

fso.DeleteFile a,true

End if

[ Last edited by jmz573515 on 2006-12-27 at 07:53 AM ]

可打印版本 | 订阅主题 | 收藏主题

论坛跳转: