FSO属性

在FSO对象模式中，不仅仅提供文件的操作方法供ASP过程调用；同时，另外也提供了File对象，供ASP程序取得文件的相关属性。以下是File对象的语法：

Set 对象模板 = fso.GetFile(filename)

语法说明

对象模板：由于已经使用了FSO对象名称，依据ASP的规定，这个对象模板的名称，必须先定义后使用。

fso.GetFile：使用FSO对象模式的GetFile方法。

filename：文件的完整路径及名称。

同时，定义了对象模板后的File对象，具有下列属性及方法。

表3 File对象的属性

Attributes
设置或返回文件或文件夹的属性，可读写或只读，视其属性而定

DateCreated
返回指定文件或文件夹所创建的日期和时间，只读

DateLastAccessed
返回指定文件或文件夹最后存取的日期和时间，只读

DateLastModified
返回指定文件或文件夹最后修改的日期和时间，只读

Drive
返回指定文件或文件夹所在的驱动器的驱动器号，只读

Name
设置或返回指定文件或文件夹的名称，可读写

ParentFolder
返回文件夹对象对指定文件或文件夹的父文件夹，只读

Path
返回指定文件、文件夹，或驱动器的路径

ShortName
返回符合传统 8.3文件命名约定转换的短文件名

ShortPath
返回符合传统 8.3命名约定转换的短路径名

Size
返回指定文件的大小，以字节数计。返回文件夹内所有文件及子文件夹的大小，以字节数计

Type
返回文件或文件夹的类型信息。例如，对于扩展名为 .TXT 的文件，返回“Text Document”

 

表4 File对象的方法
Copy
从某个位置复制指定的文件或文件夹到其他位置

Delete
删除指定文件或文件夹

Move
将指定的文件或文件夹从某位置移动到另一位置

OpenAsTextStream
打开指定文件，并返回一个TextStream对象，以用来读、写、或追加该文件

程序范例：Ch13-4.asp

在ASP程序中，使用FSO对象模式的File对象，取得指定文件的相关属性信息

<!-- EX13-04.asp FSO 对象模式 File 对象-文件属性 -->
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE>EX13-04.asp FSO 对象模式 File 对象-文件属性</TITLE>
</HEAD>
<BODY>
 <%
 Dim Location, PathInfo
 Dim fso, fs
 For I = 1 To Len(Request.ServerVariables("PATH_TRANSLATED"))
  If Mid(Request.ServerVariables("PATH_TRANSLATED"), I, 1) = "/" Then
     Location = I
  End if
 Next
 PathInfo = Mid(Request.ServerVariables("PATH_TRANSLATED") , 1, Location)
 filename = PathInfo & "TextFile1.txt"
 Set fso = CreateObject("Scripting.FileSystemObject")
 Set fs = fso.GetFile(filename)
 Response.Write "文件名  ：" & fs.Name & "<br>"
 Response.Write "文件名（8.3）   ：" & fs.ShortName & "<br>"
 Response.Write "文件类型 ：" & fs.Type & "<br>"
 Response.Write "文件路径 ：" & fs.Path & "<br>"
 Response.Write "文件路径（8.3） ：" & fs.ShortPath & "<br>"
 Response.Write "上层目录    ：" & fs.ParentFolder & "<br>"
 Response.Write "文件所在盘符  ：" & fs.Drive & "<br>"
 Response.Write "文件属性 ： " & fs.Attributes & "<br>"
 Response.Write "创建时间 ：" & fs.DateCreated & "<br>"
 Response.Write "存取时间 ：" & fs.DateLastAccessed & "<br>"
 Response.Write "修改时间 ：" & fs.DateLastModified & "<br>"
 Response.Write "文件大小 ：" & fs.Size & " Byte<br>"
 Set fso = Nothing
 %>
 </BODY>
 </HTML>

程序说明

第 18 行：使用Server.CreateObject方法，创建FSO对象模式。

第 19 行：取得文件的File对象。

第20~31行：显示文件的相关信息（使用File对象的属性）。

以下是File对象Attributes属性数值所代表的意义。

表5 File对象Attributes属性值及意义

Normal------ 0 -----普通文件，没有设置任何属性

ReadOnly---- 1---- 只读文件，属性为可读写

Hidden------ 2 ---- 隐藏文件，属性为可读写

System------ 4 ---- 系统文件，属性为可读写

Volume------ 8 ----- 磁盘驱动器卷标，属性为只读

Directory-- 16------ 文件夹或目录，属性为只读

Archive---- 32 ------ 上次备份后已更改的文件，属性为可读写

Alias------ 64-------- 链接或快捷方式，属性为只读

Compressed-- 128------ 压缩文件，属性为只读