 |
BCX Console Demonstration Program S65.bas
|
SetFileAttr (
COMMAND$
, FILE_ATTRIBUTE_HIDDEN )
SUB
SetFileAttr(
t$,a)
'----------------------------------------------------------------------------
' CONSTANT MEANING
'----------------------------------------------------------------------------
'FILE_ATTRIBUTE_ARCHIVE -- The file is an archive file
'FILE_ATTRIBUTE_HIDDEN -- The file is hidden
'FILE_ATTRIBUTE_NORMAL -- The file has no other attributes set
'FILE_ATTRIBUTE_OFFLINE -- The data of the file is not immediately available
'FILE_ATTRIBUTE_READONLY -- The file is read-only
'FILE_ATTRIBUTE_SYSTEM -- The file is part of the operating system
'FILE_ATTRIBUTE_TEMPORARY -- The file is being used for temporary storage
'----------------------------------------------------------------------------
SetFileAttributes(
t$,a)
'----------------------------------------------------------------------------
END
SUB