LPARAM lcStr LOCAL ARRAY lafiles(1, 1) =ADIR(lafiles, "lib\*.vcx") FOR x = 1 TO ALEN(lafiles, 1) USE ("lib\"+lafiles(x,1)) ALIAS CLASS IN 0 lafiles(x,1) = JUSTSTEM(lafiles(x,1))+"found" SELE * FROM CLASS; WHERE (lcstr $ LOWER(methods) OR lcstr $ LOWER(properties)); INTO CURSOR (lafiles(x,1)) IF _TALLY = 0 USE IN (lafiles(x,1)) ENDIF USE IN CLASS ENDFOR =ADIR(lafiles, "form\*.scx") FOR x = 1 TO ALEN(lafiles, 1) USE ("form\"+lafiles(x,1)) ALIAS CLASS IN 0 lafiles(x,1) = JUSTSTEM(lafiles(x,1))+"found" SELE * FROM CLASS; WHERE (lcstr $ LOWER(methods) OR lcstr $ LOWER(properties)); INTO CURSOR (lafiles(x,1)) IF _TALLY = 0 USE IN (lafiles(x,1)) ENDIF USE IN CLASS ENDFORAny classes/forms (you can include prgs) that it finds will be held in a temporary cursor.