FSO属性

本文主要是介绍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对象，取得指定文件的相关属性信息

<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 & " "
Response.Write "文件名（8.3） ：" & fs.ShortName & " "
Response.Write "文件类型：" & fs.Type & " "
Response.Write "文件路径：" & fs.Path & " "
Response.Write "文件路径（8.3）：" & fs.ShortPath & " "
Response.Write "上层目录 ：" & fs.ParentFolder & " "
Response.Write "文件所在盘符：" & fs.Drive & " "
Response.Write "文件属性： " & fs.Attributes & " "
Response.Write "创建时间：" & fs.DateCreated & " "
Response.Write "存取时间：" & fs.DateLastAccessed & " "
Response.Write "修改时间：" & fs.DateLastModified & " "
Response.Write "文件大小：" & fs.Size & " Byte "
Set fso = Nothing
%>
</BODY>
</HTML>