DECLARE INTEGER SetFileAttributes IN Kernel32 ; STRING cFileNameToAlter, ; INTEGER nAttributeMask * Set the nAttribs value to the appropriate mask, if the bit is set, it's active, not set is inactive * Read-only : nAttrib should be 1, else 0 * bit settings are cuumulative * * R = Read-only 1 * H = Hidden 2 * S = System 4 * A = Archive 32 IF (SetFileAttributes(FULLPATH(tcFileName), nAttribs) = 1) * It worked ELSE * It didn't ENDIF