asp获取当前文件名的代码

　　Dim curUrl:curUrl = Replace(Request.ServerVariables("Script_Name"),"/","")