asp獲取當前完整路徑(url)的函式程式碼
阿新 • • 發佈:2020-02-29
有時候我麼您需要獲取網址,埠、路徑檔名、引數等,這裡就為大家分享一下這個函式程式碼,需要的朋友可以參考下
函式1
<% function GetUrl() on Error Resume Next Dim strTemp if LCase(request.ServerVariables("HTTPS")) = "off" Then strTemp = "http://" Else strTemp = "https://" end if strTemp = strTemp & Request.ServerVariables("SERVER_NAME") if Request.ServerVariables("SERVER_PORT") <> 80 Then strTemp = strTemp & ":" & Request.ServerVariables("SERVER_PORT") strTemp = strTemp & Request.ServerVariables("URL") if trim(request.QueryString) <> "" Then strTemp = strTemp & "?" & Trim(Request.QueryString) GetUrl = strTemp End Function response.write GetUrl() %>
函式2
<!--獲取當前頁面路徑--> <% dim str,host,url,keyword,full str="http://"; host = Request.ServerVariables("HTTP_HOST") url = Request.ServerVariables("PATH_INFO") '或url keyword = Request.ServerVariables("QUERY_STRING") if keyword <> "" then full = str&host&url&"?"&keyword else full = str&host&url end if session("url")=full %>
使用的話肯定選擇第一個,支援https的判斷。
如果是通過404頁面除非,這個是獲取不到的,需要結合js來實現
例如:
js頁面
<script> var pathname = window.location.pathname; location.replace("/do.asp?p="+pathname); </script>
將路徑傳參給do.asp進行處理
strpath=Request("p")
即可獲取404之前的頁面,然後進行執行操作即可,注意目錄許可權。也可以放到404中處罰iframe進行操作。