设置或返回文件或文件夹的属性。根据不同属性为读/写或只读。
object.Attributes [= newattributes]
newattributes 参数可以是下列各值或者这些值的任意逻辑组合:
常数 | 值 | 描述 |
---|---|---|
Normal | 0 | 普通文件。不设置属性。 |
ReadOnly | 1 | 只读文件。属性为读/写。 |
Hidden | 2 | 隐藏文件。属性为读/写。 |
System | 4 | 系统文件。属性为读/写。 |
Volume | 8 | 磁盘驱动器卷标。属性为只读。 |
Directory | 16 | 文件夹或目录。属性为只读。 |
Archive | 32 | 文件在上次备份后已经修改。属性为读/写。 |
Alias | 64 | 链接或者快捷方式。属性为只读。 |
Compressed | 128 | 压缩文件。属性为只读。 |
下面的代码通过一个文件说明了 Attributes 属性的用法:
[JScript] function ToggleArchiveBit(filespec) { var fso, f, r, s; fso = new ActiveXObject("Scripting.FileSystemObject"); f = fso.GetFile(filespec) if (f.attributes
&& 32) { f.attributes = f.attributes - 32; s = "Archive bit is cleared."; } else { f.attributes = f.attributes + 32; s = "Archive bit is set."; } return(s); } [VBScript] Function ToggleArchiveBit(filespec) Dim fso, f Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(filespec) Iff.attributes
and 32 Then f.attributes = f.attributes - 32 ToggleArchiveBit = "Archive bit is cleared." Else f.attributes = f.attributes + 32 ToggleArchiveBit = "Archive bit is set." End If End Function
DateCreated 属性 | DateLastAccessed 属性 | DateLastModified 属性 | Drive 属性 | Files 属性 | IsRootFolder 属性 | Name 属性 | ParentFolder 属性 | Path 属性 | ShortName 属性 | ShortPath 属性 | Size 属性 | SubFolders 属性 | Type 属性