>#DEFINE CRLF CHR(13)+CHR(10) >lnFiles = ADIR( laArray, [c:\windows\*.*]) >lcFile = [] >FOR ijk = 1 TO lnFiles > m.lcFile = m.lcFile + laArray[m.ijk,1] + CRLF >NEXT >STRTOFILE(m.lcFile,[c:\test.txt]) >MODIFY FILE c:\test.txt NOEDIT >