案例：ASP/ADO案例     状态：不可编辑再运行    进入竖版
 运行结果　
​x
 
1
​
2
<html>
3
<body>
4
​
5
<%
6
dim fs, f
7
set fs=Server.CreateObject("Scripting.FileSystemObject")
8
set f=fs.GetFile(Server.MapPath("testread.txt"))
9
Response.Write("文件 testread.txt 的创建时间是：" & f.DateCreated)
10
set f=nothing
11
set fs=nothing
12
%>
13
​
14
</body>
15
</html>
16
​