>>>Hello,
>>>
>>>Is it possible to change file permissions from VFP by code? I need to process a list of files to "Allow/Deny" access for "everyone".
>>
>>
>>lparameters tcFileName, tlReadOnly, tlHidden, tlSystem
>>
>>#define FILE_ATTRIBUTE_READONLY 0x00000001
>>#define FILE_ATTRIBUTE_HIDDEN 0x00000002
>>#define FILE_ATTRIBUTE_SYSTEM 0x00000004
>>
>>local lnNewAttr
>>lnNewAttr = iif(tlReadonly,FILE_ATTRIBUTE_READONLY,0)+;
>> iif(tlHidden,FILE_ATTRIBUTE_HIDDEN,0)+;
>> iif(tlSystem,FILE_ATTRIBUTE_SYSTEM,0)
>>
>>declare integer SetFileAttributes in Win32API ;
>> string @ lpFileName, integer dwFileAttributes
>>declare integer GetFileAttributes in Win32API ;
>> string @ lpFileName
>>
>>return ( SetFileAttributes(@tcFilename, ;
>> bitor(bitand(GetFileAttributes(@tcFilename),0xFFFFFFF8),;
>> lnNewAttr)) = 1)
>
>Peter,
>This only changes RHS attributes and no security attributes.
True. However, it is more than nothing. What do you additionally suggest?
Groet,
Peter de Valença
Constructive frustration is the breeding ground of genius.
If there’s no willingness to moderate for the sake of good debate, then I have no willingness to debate at all.
Let's develop superb standards that will end the holy wars.
"There are three types of people: Alphas and Betas", said the beta decisively.
If you find this message rude or offensive or stupid, please take a step away from the keyboard and try to think calmly about an eventual a possible alternative explanation of my message.
