*** Instantiate the Filer object oMyFiler = CREATEOBJECT('Filer.FileUtil') oMyFiler.SearchPath = HOME() && Home directory oMyFiler.FileExpression = '*.TXT' && Text file search oMyFiler.Find(0) && Search, discard last collection FOR nFileCount = 1 TO oMyFiler.Files.Count oMyFiler.Files.Item(nFileCount).Edit && Open files ENDFOR>I have done a search on my computer and have almost 1,600