案例：ASP/ADO案例     状态：不可编辑再运行    进入竖版
 运行结果　
​x
 
1
​
2
<html>
3
<body>
4
​
5
<%
6
Set fs = Server.CreateObject("Scripting.FileSystemObject")
7
Set rs = fs.GetFile(Server.MapPath("/example/aspe/demo_aspe_lastmodified.asp"))
8
modified = rs.DateLastModified
9
%>
10
本文件的最后修改时间是：<%response.write(modified)
11
Set rs = Nothing
12
Set fs = Nothing
13
%>
14
​
15
</body>
16
</html>
17
​