Setting attribs of Files in Progress

JvdB

Member
Hi all,

Does anybody know if there is a way to set the attribs of a file from Progress withouth using the dos attrib command through OS-COMMAND? If so....how?
Using progres 8.3b on win98.

Thnx already

J.
 

M-HT

Member
You can use these external procedures:

&SCOPED-DEFINE FILE_ATTRIBUTE_READONLY 1
&SCOPED-DEFINE FILE_ATTRIBUTE_HIDDEN 2
&SCOPED-DEFINE FILE_ATTRIBUTE_SYSTEM 4
&SCOPED-DEFINE FILE_ATTRIBUTE_DIRECTORY 16
&SCOPED-DEFINE FILE_ATTRIBUTE_ARCHIVE 32
&SCOPED-DEFINE FILE_ATTRIBUTE_NORMAL 128
&SCOPED-DEFINE FILE_ATTRIBUTE_COMPRESSED 2048

PROCEDURE GetFileAttributesA EXTERNAL "kernel32.dll":
DEFINE INPUT PARAMETER lpFilename AS CHARACTER.
DEFINE RETURN PARAMETER dwFileAttributes AS LONG.
END.

PROCEDURE SetFileAttributesA EXTERNAL "kernel32.dll":
DEFINE INPUT PARAMETER lpFilename AS CHARACTER.
DEFINE INPUT PARAMETER dwFileAttributes AS LONG.
END.
 
Top