Method to search files 5 TIMES faster than GoFish

[myearwood1]

I created a utility called DirX which is able to handle more elements than ADIR. It can produce a cursor or an array. The cursor is better than an array since you can use FoxPro cursor-based commands.

https://github.com/myearwood1/DIRX

By applying this utility one can search all files for a string like this:

IF DirX('c_TheFiles','VFPPATH*.*','',.T.) > 0

*Which files contain "REPORT FORM"?
select ;
	occurs('REPORT FORM',upper(filetostr(alltrim(fullname)))) as nHowMany,*  ;
from ;
	c_TheFiles ;
where ;
	upper(filename) # 'MYSEARCH.PRG' ;
	and fileext in ('PRG')  ;
having ;
	nHowMany > 0 ;
order by ;
	fileext ;
INTO CURSOR ;
	JUSTTHESE ;
NOFILTER

endif

This code is 5 times faster than GoFish. The gatekeepers in this community prevent advancement by allowing for abuse of the skilled members.

Mr. Hennig is ignoring my input. He allowed Lutz to LIBEL me and both have been reported to Github for using the platform for illegal activity.