说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

目录所占的字节数-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
目录所占的字节数-VB资料
该函数返回目录使用的字节数:

Function DirUsedBytes(ByVal dirName As String) As Long
Dim FileName As String
Dim FileSize As Currency
If Right$(dirName, 1) <> "\" Then
dirName = dirName & "\"
Endif
FileSize = 0
FileName = Dir$(dirName & "*.*")
Do While FileName <> ""
FileSize = FileSize + _
FileLen(dirName & FileName)
FileName = Dir$
Loop
DirUsedBytes = FileSize
使用:
MsgBox DirUsedBytes("C:\Windows")

自制THyperLink组件-Delphi资料 报表制作技巧(三)-Delphi资料 Delphi数据库开发及统计表格设计 Delphi文本和图形的打印方法 Delphi应用程序中中国式报表的制作 Windows环境下实时列表输出的实现方法-Delphi资料 报表制作技巧(二)-Delphi资料 Delphi编制的程序运行中动态制作报表 报表制作技巧(一)-Delphi资料 如何在WINDOWS中控制打印字体的长宽,而不受限于SIZE 的限制-Delphi资料 也谈为Delphi中数据库报表加网格 用Delphi4的QReport部件生成报表 用Delphi编写打印程序的窍门 用Word做Delphi报表输出工具 在DELPHI 文 本 和 图 形 的 打 印 在Delphi中运用QuickReport实现多栏列印 在打印或打印预览前如何获取报表页数-Delphi资料 自定义快速报表的打印预览窗口-Delphi资料 Delphi 3 图形VCL中Bug修改方案 Delphi hint的字体和色彩如何改变 Delphi3.0中复活节彩蛋及实现 Delphi数据库应用程序开发中图像数据的存取技巧 DELPHI图形编辑技巧二则 DELPHI显示JPEG图像文件 Delphi中CANVAS使用三例 Delphi中的图形显示技巧 DELPHI中画布应用技巧 Delphi中控件深度投影及阴影效果的实现 DELPHI中利用对象的常用属性制作动画 Form生成时的事件次序-Delphi资料 LED数码管仿真显示程序-Delphi资料 IP包过滤程序问题!!!请大虾帮忙!! sql loader里面不支持FILLER 双系统中,如何删除WIN2000?(98+2000) 实现了第一个愿望... vc和vc.net有什么区别,学了vc有必要学vc.net吗??? 急,数据库表的问题!!! 为什么在Run ActivX程序时出现问题? DLL窗体关闭问题 setfont设置Dialog字体无效,搞不明白,大侠指点 为什么我的Web应用程序项目启动不了,总是出现错误!!! 100分求教jtable问题??? 菜鸟送分问题,请哪位大侠讲讲Inte1.ResponseCode和Inte1.ResponseInfo 声音变了!怎么办啊??? 100分 请问怎么做“索引”? make求救 用ant编译pet store 时,出现问题,提示信息见内文?请帮忙。。。高分酬谢。 三个三角了 开心ing 散分 tmd,上了vsnet2003贼船了。原来vc6的都不好用了 找在linux下免费gui?? 打开窗口获取原窗口信息的问题 Cbuilder安装问题,急! HelloWorld大全[接龙] 我要写一个程序在前台不需要运行后台运行可以:就像平时邮件服务品一样在前台不需要运行,而后台是提供服务的,要怎样来实现 临时表问题 多媒体教学系统开发 jbuilder中关于类的import问题? 有关远程控制的,例如抓屏,限制功能键,限制alt+f4,等等,请去http://hedaofeng.jahee.com 如何取得IE地址栏的输入信息? 急求一段ASP与SQLserver2000处理代码! 怎么创建win32 static library并输出函数?谢谢 !!!!求排列组合的简洁算法(80分) 我要对Spreadsheet的数据进行排序,用javascript怎么写 WIN32异常求救????!!!!!! 一个有深度的问题(对信号量操作不熟者请勿进) 知道为什么会出现iocopyout_chksum吗? 谁能给我《中文ACCESS开发指导手册》?? 从网上下的读不了 请问一个小问题 关于用Preferences存取注册表的问题 参数类型的问题 谁知道用什麽软件可以播放扩展名为1MP3的文件?(100分) 请问把一个二进制文件转换成文本文件,再把文本文件转换成二进制文件,该怎么做?求源代码?或有该代码的网址链接,多谢!不胜感激! main()函数里的两个参数argc、argv是什么意思?请赐教! 用HTTP上传文件,那位做过实际的应用的,帮忙... 大家上微软新闻组吧,感觉比这里快。 用jfreechart画出的图形,里边的汉字不太清楚,有没有解决的办法,要是图形小一点,模糊不清,难看死了,请问有没有解决办法?? 在vc.net中为什么新建的一个dialog,上面有双重的图象啊? asp&oracle问题 .net2003中vb升级向导有没有接口可以被其他程序调用? 以二进制方式打开文件,用ftell计算文件大小,为什么有时对有时不对? CHtmlEditView中如何实现表格的单元格大小调整? 城市夜归人 对括号部分提问:1it is 7 (one clock)2Alicia takes ashower (at 9:00) 最好给出解释. 宣布的近义词 用一两句话评价汉武帝 i would like to express my grateful if you would be kind enough to provide me with certain essential information 这句话有语法错误吗 Have you ever been to the Opera House?是什么意思 Sydeny Opera House 的中文是什么谢谢了, 英语中active expressions 是什么?是一种语法用词,应该是指的什么类型的词组 I have many sweet .Let me_____them_____( 分发) 数据表示四台显微镜的放大倍数,分析回答下列问题显微镜序号 目镜 物镜A 10× 10×B 5× 10×C 16× 40×D 16× 20×1)如果观察同一标本的同一区域,视野内细胞最少的是 () (都填序号)(2)如果观 I have something to eat 这里的不定式为什么要用to eat而不是to be eaten 是不是因为是是I 发出的这个动作I eat something 浙江金华婺城区发生一起安全事故 致2浙江一工作人员被爆不务正业 上班玩游中国留学生勇救日本落水儿童获驻日使馆河南“死刑保证书案”民事上诉被驳回 专家PMI保持升势 经济稳定增长态势日媒:中国调查船驶入钓鱼岛附近“专属日本举行国内首次大规模“夺岛”演习日本举行国内首次大规模“夺岛”演习英国10月份制造业PMI回落至56.今年全国平均雾霾日数为4.7天 系5河南新乡“失误”审批百亩别墅 五责任心理咨询师自称是接受吐槽“树洞”寻找学生的“关键能力”(新评弹)夏季达沃斯聚焦大连普湾新区奥巴马“荒野求生”啃生鱼济南环境督查组暗访遭殴打 公务车被砸笃志躬行方能固本培元七个月高强度训练,踢坏战靴六双想第一时间尝鲜?赶紧进店抢购吧!八百壮士与白市驿孩子十佳避暑休闲目的地出炉2015年国际(亳州)中医药博览会举极剑巅峰击爆星云火影情刀红色警戒之疯子传奇齐天大圣的弟弟修神传白衣魔相狱人讨个老婆真不易血色苍茫机甲无限进化飞翔的中国人湖滨晴雨旅游扇子陡旅游唐大慈恩寺遗址公园旅游宿城世外桃源风景区旅游海州湾旅游秦山岛旅游木塔旅游古韵镇远旅游小寨子沟旅游地震遗址纪念公园旅游澳凼大桥旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘