在asp中，我們很多時(shí)候獲取url都是利用javascript來實(shí)現(xiàn)的，這個(gè)很簡(jiǎn)單，用window.location.href就可以獲得了URL的全部路徑，包括后面的參數(shù)，然后再用split函數(shù)來分離就好了
但在asp中，我們很多時(shí)候只想：
response.Write"SCRIPT_NAME獲取的值：" &Request.ServerVariables("SCRIPT_NAME")&"
"
'=========================
'獲取當(dāng)前Url參數(shù)的函數(shù)
Private Function GetUrl()
Dim ScriptAddress,M_ItemUrl, M_item
ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME")) '取得當(dāng)前地址
M_ItemUrl = ""
response.Write(Request.QueryString&"
")
If (Request.QueryString <> "") Then
ScriptAddress = ScriptAddress & "?"
For Each M_item In Request.QueryString
'如果頁面?zhèn)鬟f參數(shù)是用page變量，那么判斷一下page是否已經(jīng)使用，避免重復(fù)!
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
if instr(1,GetUrl,"?",1)<1 then
GetUrl=GetUrl&"?"
end if
End Function
'=============================
response.Write GetUrl
更多信息請(qǐng)查看IT技術(shù)專欄
公眾號(hào)
事業(yè)單位
當(dāng)前位置：
公考類
招聘類
各類考試