Or...

You could use the Skeleton options of Adir

eg

=Adir(myDbfArr, '*.dbf')
=Adir(myCDXArr, '*.cdx')
=Adir(myFptArr, '*.fpt')

As long as one subset of files doesn't exceed 13,000 files you'll be ok


>Hello !!
>
>I would like to get a list of file in a directory...
>Normally, I use the ADIR() command but in this case, there is a large amount of files (about 20000).
>So the ADIR() command fails because of the VFP system capabilities (65000 records in an array...)
>
>Which replacement to ADIR() can I use ?
>Is there a solution with API's or WSH ??
>
>(just to get the file list, then I'll put each name in a record of a dbf file..It will be easier to manage...)
>
>Thanks a lot !