You just ran into the limit of available memory variables. Do you really need to usethis function on a directory that big? If so, you'll probably have to break it down so it runs in one piece at a time.

>Hi Ed,
>
>I was trying to run the example below on my computer and I got a "too many variables" error. I can't seem to understand how that is happening. I have a large hard drive with a lot of files...
>
>Thanks
>
>

* ADIR() method of recursively building the file list - Dave Frankenbach
>ltStart = datetime()
>
>create cursor filesADIR ( cFilename c(80), nSize n(10), dMod d )
>
>RecurseFolder( "c:\" )
>? datetime() - ltStart
>
>index on nSize tag nSize
>
>browse nowait
>
>function RecurseFolder( lcDir )
>local i,n, laFiles[1]
>
>?? "."
>n = adir( laFiles, lcDir + "*.*", "shd" )
>
>for i = 1 to n
>   if ( left( laFiles[i,1], 1 ) != '.' )
>      if ( "D" $ laFiles[i,5] )
>         RecurseFolder( lcDir + laFiles[i,1] + "\" )
>      else
>        insert into filesADIR ;
>               values( lcDir + laFiles[i,1], laFiles[i,2], laFiles[i,3] )
>      endif
>   endif
>endfor
>return
>
>