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>

本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。