核心代碼：

<%TempArray = Array("account_book","admin","ajaxFile","catalog","excel","excel_stu","frame","inc","lib","pub", "stock","student","sygl","temp","windows")url= LCase(Server.MapPath("./"))for i=0 to UBound(TempArray)url=Replace(url,"/"&TempArray(i),"")Nextresponse.write url%>