Question

VFP程序获取某一目录下的所有文件夹名，并保存到dbf表里。

Answer 1

在VFP9中简单
n=adir(x,"C:\windows\*.*","D")
&&
获取C:\windows文件夹下的所有目录名
for
i=1
to
n
insert
into
aa(dirname)
values(x(i,1))
next
i

Answer 2

n=adir(x,"c:\windows\*.*","d")——
获取c:\windows文件夹下的所有目录名
for
i=1
to
n
insert
into
aa(dirname)
values(x(i,1))
next
i
参考资料
百度知道.百度[引用时间2018-4-5]