复制代码 代码如下:
set fso=createobject("Scripting.FileSystemObject")
set fn=fso.GetFile("E:\AD.txt")
msgbox "文件创建时间："&fn.DateCreated
msgbox "文件最后修改时间："&fn.DateLastModified
msgbox "文件最后访问时间："&fn.DateLastAccessed
set fn=nothing
set fso=nothing

FileSystemObject 对象简介：

FileSystemObject 对象用于访问服务器上的文件系统。此对象可对文件、文件夹以及目录路径进行操作。也可通过此对象获取文件系统的信息。
下面的代码会创建一个文本文件 (c:\test.txt)，然后向这个文件写一些文本：
复制代码 代码如下:<%
dim fs,fname
      set fs=Server.CreateObject("Scripting.FileSystemObject")
      set fname=fs.CreateTextFile("c:\test.txt",true)
      fname.WriteLine("Hello World!")
      fname.Close
set fname=nothing
set fs=nothing
%>

更多请参考FileSystemObject官方文档：http://msdn.microsoft.com/zh-cn/library/aa711216