VBScript » File » Attributes

Version: 3.0

Syntax:
object.Attributes [ =newattributes]
newattributes
Used to specify a new file attribute from the File Attribute Values table.

This property allows us to get or change the various attributes of a file.

The available attribute values are listed below.

File Attribute Values

Name

Value

Description

Read/Write attribute

Normal

0

Normal file

Read/write

ReadOnly

1

Read-only file

Read only

Hidden

2

Hidden file

Read/write

System

4

System file

Read/write

Volume

8

Disk drive volume label

Read only

Directory

16

Folder or directory

Read-only

Archive

32

File has changed since last backup

Read/write

Alias

64

Link or shortcut

Read-only

Compressed

2048

Compressed file

Read-only

Examples

Code:
<%
dim filesys, text, readfile
set filesys = CreateObject("Scripting.FileSystemObject")
Set text = filesys.CreateTextFile("c:\somefile2.txt")
text.Write "A simple test to find if this file is writeable."
text.close
set readfile = filesys.GetFile("c:\somefile2.txt")
If Not readfile.Attributes And 1 Then
Response.Write "The file is Read/Write."
Else
Response.Write "The file is Read-only."
End If
%>
Output:
"The file is Read/Write."
Explanation:

This code shows how to check if a file is read/write or read-only. As you can see, logical operators are used to get or change the various attributes.