案例:ASP/ADO案例     状态:不可编辑再运行    进入竖版
 运行结果 
x
 
1
2
<html>
3
<body>
4
5
<%
6
Set fs=Server.CreateObject("Scripting.FileSystemObject")
7
8
Response.Write("文件 3dgarro 的文件扩展名是:")
9
Response.Write(fs.GetExtensionName("c:\windows\cursors\abc.cur"))
10
11
set fs=nothing
12
%>
13
14
</body>
15
</html>
16