asp获取url参数 但是这个估计大家也用不到吧

现在用asp的人很少了 基本上没什么用了 留存一下吧

asp获取URL参数

<%
Function GetLocationURL() 
Dim Url 
Dim ServerPort,ServerName,ScriptName,QueryString 
ServerName = Request.ServerVariables("") 
ServerPort = Request.ServerVariables("") 
ScriptName = Request.ServerVariables("") 
QueryString = Request.ServerVariables("QUERY_STRING") 
Url=""&ServerName 
If ServerPort <> "80" Then Url = Url & "" & ServerPort 
Url=Url&ScriptName 
If QueryString <>"" Then Url=Url&""& QueryString 
GetLocationURL=Url 
End Function 
Response.Write GetLocationURL()
%>