如何取得文件夹中所有文件名

huanzi833

如上

huanzi833

怎么都没人理我，有那么难吗？

青青

循环使用dir函数，直到出错。限制条件，读不到子目录里的文件。

LucasLynn

青青推荐给你的是标准的做法，通常都应该这样做。

下面再推荐给你一种另类方法，在数据库环境下很好用。

1、调用操作系统控制台命令：DIR C:\XXX\XXX\*.* /B /A-D > C:\XXX\XXX\XXX\XXX.LOG

2、调用Access导入这个LOG文件为数据表

现在来看看这个数据表里面都有什么：

AUTOEXEC.BAT

boot.ini

bootfont.bin

BOOTSECT.DOS

cmldr

COMMAND.COM

CONFIG.SYS

IO.SYS

KAVInfo.ini

MSDOS.SYS

NTDETECT.COM

ntldr

PDOS.DEF

PPTCHPAD.INI

SUHDLOG.DAT

这种方法有很多好处，因为DIR命令的参数很多，你可以通过不同的参数获得不同的数据或不同的格式，比方说：



DIR C:\WINDOWS /B /A-D /S '列出所有子文件夹中所有文件的完整路径。

另外，VBA的Dir命令不支持排序，如果你需要排序的话只能自己手工做了。用控制台命令则不需要。

[此贴子已经被作者于2005-9-30 16:49:48编辑过]