日期:2010-02-14 浏览次数:21115 次
ASP获取当前页面带参数的网址(URL地址)的方法
以下是引用片段: ’=========================================== ’获取当前Url参数的函数 Function GetUrl() Dim ScriptAddress,Servername,qs ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME")) Servername = CStr(Request.ServerVariables("Server_Name")) qs=Request.QueryString if qs<>"" then GetUrl ="http://"& Servername & ScriptAddress &"?"&qs else GetUrl ="http://"& Servername & ScriptAddress end if End Function |