FSO读取一个文件相关信息的范例

<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
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值