Ty_GetDirInfo
来源:互联网 发布:网络海外代购兼职 编辑:程序博客网 时间:2024/06/05 06:08
function Ty_GetDirInfo(s_Dir:String;id:byte):string;var FSO,Folder,Drive:Variant;begin FSO:=CreateOLEObject('Scripting.FileSystemObject'); Folder:=FSO.GetFolder(s_Dir); Drive :=fso.GetDrive(fso.GetDriveName(s_Dir)); case id of 1:result:=Folder.files.count; //文件总数 2:result:=Ty_ByteToStr(Folder.size);//文件夹大小 3:result:=Ty_ByteToStr(Drive.FreeSpace); //可用空间 4:Result:=Ty_ByteToStr(Drive.TotalSize); //总空间 end;end;
- Ty_GetDirInfo
- 索引扫描
- 《越狱》中的项目管理之道(转)
- 人生若只如初见
- eclipse + maven + glassfish embedded
- 【.Net MF网络开发板研究-05】Socket编程之客户端
- Ty_GetDirInfo
- Asterisk vs. FreeSWITCH
- jquery + json + springMVC集成在controller中实现Ajax功能
- 一些常用的API
- 2011.07.20
- 浅谈Service Manager成为Android进程间通信(IPC)机制Binder守护进程之路
- Unable to find parent packages json-default 与java.lang.ClassNotFoundException: net.sf.ezmorph.Morphe
- j2ee主流框架学习总结
- 活用Android的Message Queue(来自高焕堂的讲义)