<html> <body> <% Set fs=Server.CreateObject("Scripting.FileSystemObject") Response.Write("文件RuanChen的扩展名为： ") Response.Write(fs.GetExtensionName("c:winntcursorsRuanChen.cur")) set fs=nothing %> </body> </html>
效果会显示在右边 Create by 软晨网（RuanChen.com）