Property: Folder.Attributes
Implemented in version 2.0
object.Attributes
[ = newattributes]
This property allows
us to get or change the various attributes of a folder. The available
attribute values are listed below.
|
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
|
The following code shows how to check if a folder is read/write or read-only.
As you can see, logical operators are used to get or change the various
attributes.
Code:
<%
dim filesys, demofolder
set filesys = CreateObject("Scripting.FileSystemObject")
set demofolder = filesys.GetFolder("c:\Projects\")
If Not demofolder.Attributes And 1 Then
Response.Write "The folder is Read/Write."
Else
Response.Write "The folder is Read-only."
End If
%>
Output:
"The folder is Read/Write."
Copyright 1999-2001 by Infinite Software Solutions, Inc. All rights reserved.
Trademark Information
|