asp获取当前文件名的代码

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