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.
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.
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
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.