<html> <body> <% Set fs=Server.CreateObject("Scripting.FileSystemObject") Response.Write(fs.GetBaseName("c:winntcursorsRuanChen.cur")) Response.Write("<br />") Response.Write(fs.GetBaseName("c:winntcursors")) Response.Write("<br />") Response.Write(fs.GetBaseName("c:winnt")) set fs=nothing %> </body> </html>
效果会显示在右边 Create by 软晨网（RuanChen.com）