The array size in VFP8 and earlier is limited to 65000 elements. As result ADIR() cannot process more than 13000 entries. In VFP9 there's no hard limit on the array size.
>The code below works fine until lately. I think it may be too many frx files - there are now 13,597. I thought the array size limit was much larger.
>
>
>crea cursor txtpick (name c(50), size n(10), date d(8))
>
>mcnt = adir(ltxt,(*.frx))
>IF mcnt = 0
> =MESSAGEBOX('No matching files found',48,'Bad Luck')
> thisform.Release
> SELECT txtpick
> use
>ENDIF
>
>sele txtpick
>appe from array ltxt
>INDEX ON name tag name
>index on date tag date desc
--sb--