销售管理软件版1楼: 只是想试试FSO在Delphi上的使用。
var
FSO,Fder : OleVariant;
begin
FSO := CreateOleObject(＇＇Scripting.FileSystemObject＇＇);
Fder := FSO.GetFolder(＇＇E:＼Test＇＇);
ListBox.Item.add(Fder.SubFolders.Count); ＼＼执行正确；
ListBox.Item.add(Fder.SubFolders.Item[i].name); ＼＼i为任意正数，文件夹内有子文件夹。 提示参数不正确；
ListBox.Item.add(Fder.SubFolders.Item(i).name); ＼＼i为任意正数，文件夹内有子文件夹。 提示方法不存在；
end;
尝试用IUnknown(Fder.SubFolders) as IEnumVariant ＼＼提示不支持该接口;
希望知道的朋友能帮助一下。

2楼: 用delphi还用FileSystemObject？汗,delphi有一堆的文件处理函数. 如服装进销存软件破解

3楼: 用这个有什么好处呢

4楼: 楼主是VB爱好者.尽管现在使用delphi,还是不忘微软亲.

5楼: 这套不好用

6楼: 帮顶!

http://www.source520.com

站长开发推广同盟 站长朋友的终极驿站
同时拥有海量源码电子经典书籍下载

http://www.source520.com/search/search.asp

＂编程.站长＂论坛搜索引擎-----为中国站长注入动力!