取得当前程序脚本路径.txt

来自「较为详细的介绍了asp自定义的各种函数,方便asp的各种开发.」· 文本 代码 · 共 9 行

Function GetScriptName() 
ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME"))'取得当前地址 
If (Request.QueryString <> "") Then 
ScriptAddress = ScriptAddress & "?" & Server.HTMLEncode(Request.QueryString)'取得带参数地址 
End If 
If Len(ScriptAddress)>250 Then ScriptAddress = Left(ScirptAddress,250)&"..." '进行路径截取，最大为250个字符 
GetScriptName = ScriptAddress 
End Function