LOCAL lnFiles, laFiles >SET DEFAULT TO 'c:\your directory' >lnFiles=ADIR(laFiles,'*.dbc') &&or *.* etc.... >FOR N=1 TO lnFiles > THISFORM.fileprop.setfileattribute('c:\your directory\'+laFiles[n],'HSRA') >ENDFOR >SET DEFAULT TO >