网页制作学习园地论坛站长交流区『 免费代码及编程交流 』 → FSO如何取得文件修改日期和相关信息


  共有9023人关注过本帖树形打印

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

帅哥哟,离线,有人找我吗?
gaofeng
  1楼 个性首页 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:3510 积分:11231 威望:5 精华:7 注册:2000-5-19 10:19:38
FSO如何取得文件修改日期和相关信息  发帖心情 Post By:2014-2-13 16:05:44

<html>   
<body>读取一个文件相关信息的范例<br><br>   
<%   
   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&"<br>"   
         Response.Write  "文件的路径:"&objFile.Path&"<br>"   
         Response.Write  "文件的建立日期:"&objFile.DateCreated&"<br>"   
         Response.Write  "文件的最后浏览日期:"&objFile.DateLastAccessed&"<br>"   
         Response.Write  "文件的最后修改日期:"&objFile.DateLastModified&"<br>"   
         Response.Write  "文件的大小:"&objFile.Size&"<br>"   
         Response.Write  "文件的类型:"&objFile.Type&"<br>"   
     Else   
         Response.Write  Server.MapPath("newfile.asp")&"不存在,无法读取相关信息"   
     End  If   
   Set  objFile  =  Nothing   
   Set  objFSO  =  Nothing            ’释放  FileSystemObject  对象实例内存空间   
%>   
</body></html>


 


支持(0中立(0反对(0回到顶部