lcPath = 'c:\temp\' lcSkeleton = '*.tmp' declare integer SetFileAttributes in Win32API ; string @ lpFileName, integer dwFileAttributes declare short DeleteFile in win32API string @ lpFileName lnFiles=adir(arrFiles,lcPath+lcSkeleton,'HS') for ix=1 to lnFiles SetFileAttributes(lcPath+arrFiles[ix,1], 0) DeleteFile(lcPath+arrFiles[ix,1]) endforCetin