FSO如何取得文件修改日期和相关信息

2022-07-15 80酷酷网 80kuku.com

　　fso

<html>
<body>读取一个文件相关信息的范例


<%
   Dim  objFSO,objFile        ’声明一个名称为  objFSO  的变量以存放对象实例
   Set  objFSO  =  Server.CreateObject("Scripting.FileSystemObject")
     If  objFSO.FileExists(Server.MapPath("newfile.asp"))  Then
         Set  objFile  =  objFSO.GetFile(Server.MapPath("newfile.asp"))
         Response.Write  "文件的名称："&objFile.Name&"
"
         Response.Write  "文件的路径："&objFile.Path&"
"
         Response.Write  "文件的建立日期："&objFile.DateCreated&"
"
         Response.Write  "文件的最后浏览日期："&objFile.DateLastAccessed&"
"
         Response.Write  "文件的最后修改日期："&objFile.DateLastModified&"
"
         Response.Write  "文件的大小："&objFile.Size&"
"
         Response.Write  "文件的类型："&objFile.Type&"
"
     Else
         Response.Write  Server.MapPath("newfile.asp")&"不存在，无法读取相关信息"
     End  If
   Set  objFile  =  Nothing
   Set  objFSO  =  Nothing            ’释放  FileSystemObject  对象实例内存空间
%>
</body></html>