【www.gdgbn.com--面向对象编程】

在下面的例子中,我们创建一个FileSystemObject对象的实例,然后使用GetFile方法实例化File对象。之后,我们使用的文件对象属性以获取有关指定文件的信息:

<%
Dim objFSO, objDrive
"Create a FileSystemObject instance
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
"Using the GetFile method of FileSystemObject object, initialize a File object
Set objFile = objFSO.GetFile("c: est.txt")
"Retrieve information about the file
Response.Write "Name: " & objFile.Name & "
"
Response.Write "ShortName: " & objFile.ShortName & "
"
Response.Write "Size: " & objFile.Size & " bytes
"
Response.Write "Type: " & objFile.Type & "
"
Response.Write "Path: " & objFile.Path & "
"
Response.Write "ShortPath: " & objFile.ShortPath & "
"
Response.Write "Created: " & objFile.DateCreated & "
"
Response.Write "LastModified: " & objFile.DateLastModified & "

"

%>

本文来源:http://www.gdgbn.com/jsp/23644/