* Sample usage. Omitting RO,Hidden,System parameters - all would be .F. ChangeFileAttrib("C:\WINDOWS\SYSTEM\UTILITY.DLL") Funtion ChangeFileAttrib lparameters tcFileName, tlReadOnly, tlHidden, tlSystem #define FILE_ATTRIBUTE_READONLY 0x00000001 #define FILE_ATTRIBUTE_HIDDEN 0x00000002 #define FILE_ATTRIBUTE_SYSTEM 0x00000004 local lnNewAttr lnNewAttr = iif(m.tlReadonly,FILE_ATTRIBUTE_READONLY,0)+; iif(m.tlHidden,FILE_ATTRIBUTE_HIDDEN,0)+; iif(m.tlSystem,FILE_ATTRIBUTE_SYSTEM,0) declare integer SetFileAttributes in Win32API ; string @ lpFileName, integer dwFileAttributes declare integer GetFileAttributes in Win32API ; string @ lpFileName SetFileAttributes(@tcFilename, ; bitor(bitand(GetFileAttributes(@tcFilename),0xFFFFFFF8),m.lnNewAttr)) endfuncCetin