杭州交通信息网梅麻吕厕所扫除动画版:ASP 如何获取到本页完整的 URL 地址？？
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/04 17:56:26
例如：
主机/xxx.asp?aaa=1&bbb=2&ccc=3
如何在该页里获取到这个完整的url：“xxx.asp?aaa=1&bbb=2&ccc=3”
主机/xxx.asp?aaa=1&bbb=2&ccc=3
如何在该页里获取到这个完整的url：“xxx.asp?aaa=1&bbb=2&ccc=3”
方法如下:
<%
Private Function GetUrl()
Dim ScriptAddress, M_ItemUrl, M_item
ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME")) '取得当前地址
M_ItemUrl = ""
If (Request.QueryString <> "") Then
ScriptAddress = ScriptAddress & "?"
For Each M_item In Request.QueryString
If InStr(page,M_Item)=0 Then
M_ItemUrl = M_ItemUrl & M_Item &"="& Server.URLEncode(Request.QueryString(""&M_Item&"")) & "&"
End If
Next
end if
GetUrl = ScriptAddress & M_ItemUrl
End Function
response.write geturl()
%>