在下面的例子中,我们创建一个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 & "<br />"
Response.Write "ShortName: " & objFile.ShortName & "<br />"
Response.Write "Size: " & objFile.Size & " bytes <br />"
Response.Write "Type: " & objFile.Type & "<br />"
Response.Write "Path: " & objFile.Path & "<br />"
Response.Write "ShortPath: " & objFile.ShortPath & "<br />"
Response.Write "Created: " & objFile.DateCreated & "<br />"
Response.Write "LastModified: " & objFile.DateLastModified & "<br /><br />"
%>