案例:ASP/ADO案例     状态:不可编辑再运行    进入竖版
 运行结果 
x
 
1
2
<html>
3
<body>
4
5
<%
6
Set fs=Server.CreateObject("Scripting.FileSystemObject")
7
8
If (fs.FileExists("c:\windows\cursors\xxx.cur"))=true Then 
9
10
Response.Write("文件 c:\windows\cursors\xxx.cur 存在。")
11
12
Else
13
      Response.Write("文件 c:\windows\cursors\xxx.cur 不存在。")
14
End If
15
16
set fs=nothing
17
%>
18
19
</body>
20
</html>
21