local nloop,cfilename,cOutput Local array aFiles(1) cOutput='c:\tmpfox\' set default to (cOutput) nFiles=adir(aFiles) If nFiles>0 for nLoop=1 to nFiles cFilename=cOutput+aFiles[nLoop,1] delete file (cFilename) endfor Endif set default to (oApp.startdir) return .t.I afraid about any unexpected problem that will cause the 'set defa to local' to fail and the user will delete thr real data.