淘宝双十一超级红包 》
ASP Attributes 属性
完整的 Folder 对象参考手册
Attributes 属性用于设置或返回指定文件或文件夹的属性。
语法
FileObject.Attributes[=newattributes]
FolderObject.Attributes[=newattributes]
FolderObject.Attributes[=newattributes]
| 参数 | 描述 |
|---|---|
| newattributes | 可选的。规定文件或文件夹的属性值。
可采用下列值之一或者下列值的组合： 0 = 普通文件。 |
针对 File 对象的实例
<%
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFile("c:\test.txt")
Response.Write("The attributes of the file are: ")
Response.Write(f.Attributes)
set f=nothing
set fs=nothing
%>
输出：
The attributes of the file are: 32
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFile("c:\test.txt")
Response.Write("The attributes of the file are: ")
Response.Write(f.Attributes)
set f=nothing
set fs=nothing
%>
输出：
The attributes of the file are: 32
针对 Folder 对象的实例
<%
dim fs,fo
set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("c:\test")
Response.Write("The attributes of the folder are: ")
Response.Write(fo.Attributes)
set fo=nothing
set fs=nothing
%>
输出：
The attributes of the folder are: 16
dim fs,fo
set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("c:\test")
Response.Write("The attributes of the folder are: ")
Response.Write(fo.Attributes)
set fo=nothing
set fs=nothing
%>
输出：
The attributes of the folder are: 16
完整的 Folder 对象参考手册