源代码
<% Set fs=Server.CreateObject("Scripting.FileSystemObject") Response.Write(fs.GetBaseName("c:\windows\cursors\abc.cur")) Response.Write("
") Response.Write(fs.GetBaseName("c:\windows\cursors\")) Response.Write("
") Response.Write(fs.GetBaseName("c:\windows\")) set fs=nothing %>
运行结果