| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 893 人关注过本帖
标题:求文件夹大小?
取消只看楼主 加入收藏
su0527
Rank: 2
等 级:论坛游民
帖 子:452
专家分:79
注 册:2015-1-10
结帖率:96.03%
收藏
已结贴  问题点数:11 回复次数:3 
求文件夹大小?
有一个文件夹,里面放着每天向里面拷贝的多个表文件。当这个文件夹达到1GB时就删除早期拷贝进来的表文件,以保正该文件夹不至于过大。
1.求这个文件夹大小?
2.如何删除较早期的表文件?
搜索更多相关主题的帖子: 文件夹 如何 
2016-10-27 20:34
su0527
Rank: 2
等 级:论坛游民
帖 子:452
专家分:79
注 册:2015-1-10
收藏
得分:0 
回复 4楼 吹水佬
测试了,可行。但连编时,出现错误:未知的 AF - 未定义。
我在代码前加上:dime af(x,y)   出现错误:找不到变量x,y
指点一下。

2016-10-28 09:06
su0527
Rank: 2
等 级:论坛游民
帖 子:452
专家分:79
注 册:2015-1-10
收藏
得分:0 
回复 4楼 吹水佬

        dx=0
        FOR i=1 TO ADIR(af, "e:\小精灵数据手动备份\*.*")
        tw=af[i,2]
        dx=dx+tw
        ENDFOR
        thisform.text1.Value=dx/1024/1024
测试正确,连编出现错误:AF未定义。
2016-10-28 09:09
su0527
Rank: 2
等 级:论坛游民
帖 子:452
专家分:79
注 册:2015-1-10
收藏
得分:0 
回复 7楼 吹水佬
采用了吹水佬的思路,同时感谢红星二锅头。
谢谢!
2016-10-28 11:32
快速回复:求文件夹大小?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021364 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved