[芜湖网站建设] ASP获取当前页面URL
<%FunctionGetLocationURL()DimUrlDimServerPort,ServerName,ScriptName,QueryStringServerName=Request.ServerVariables("SERVER_NAME")ServerPort=Request.ServerVariables("SERVER_PORT")ScriptName=Request.ServerVariables("SCRIPT_NAME")QueryString=Request.ServerVariables("QUERY_STRING")Url="http://"&ServerNameIfServerPort<>"80"ThenUrl=Url&":"&ServerPortUrl=Url&ScriptNameIfQueryString<>""ThenUrl=Url&"?"&QueryStringGetLocationURL=UrlEndFunctionResponse.WriteGetLocationURL()%>functiongetcenter(str,a,b)'str是字符串getcenter=split(split(str,a)(1),b)(0)endfunctionResponse.Writegetcenter(GetLocationURL(),"=","")。
2019/9/23