Property: Attributes for Folder

Download PDF

Updated2024-09-12
1 minute(s) read

Checks the attributes of a folder.

Object.Attributes

Object

Folder
Object with this property

Object.Attributes

Enumeration with read and write access and the following selection terms:

0	Normal	Folder without attributes.
1	ReadOnly	Write-protected file. Attribute with read and write access.
2	Hidden	Hidden folder. Attribute with read and write access.
4	System	System folder Attribute with read and write access.
8	Volume	Hard disk name. Attribute with read access.
16	Directory	folder. This attribute is read-only.
32	Archive	Changes were made to the file after the last backup. Attribute with read and write access.
1024	Alias	Operator. Attribute with read access.
2048	Compressed	Compressed file. Attribute with read access.

The following example removes the write-protection of a folder:

Copy script

Sub MakeWritable(sFolder)
  Dim fso, oMyFolder
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set oMyFolder = fso.GetFolder(sFolder)
  If oMyFolder.Attributes and 1 Then
    oMyFolder.Attributes = oMyFolder.Attributes - 1
  End If
End Sub

DIAdem Help

Table of Contents

Property: Attributes for Folder

See Also

Log in to get a better experience