蜜桃色视频,久久成人精品视频,日韩国产成人资源精品视频

[點晴永久免費OA]asp獲取當前網址和文件名的代碼

admin

2022年6月22日 0:12 本文熱度 1365

Dim curUrl

curUrl = Replace(Request.ServerVariables("script_Name"),"/","")

當前頁地址
<%dim urlname
urlname=Request.ServerVariables("QUERY_STRING")%>
<%=Request.ServerVariables("script_NAME")%><%if urlname<>"" then%>?<%=urlname%><%end if%>

需要用到這個功能，沒怎么測試呢，測試后給具體代碼。
假如地址是：
http://dxy.com:8082/test/geturl.asp?Param-VR52tmx3syn03777.html

方法一：簡單，得不到參數，只有一個虛擬路徑，代碼如下：
GetUrl =request("url")  '這個因為我們沒有url=什么字樣所以直接pass掉

方法二：得到整個URL，得到參數，代碼如下：
'得到當前頁面的地址
   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

經測試這個代碼得到的路徑為：
/test/geturl.asp?Param-VR52tmx3syn03777.html=

方法二：得到虛擬路徑，得到參數，代碼如下：
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 M_item = "page_num" Then Exit for '此處的作用就是過濾掉Page_num這個頁次的參數(該參數是在page_turn.asp中自行設置的，根據個人設定而變)，否則每次翻頁都會疊加這個參數，雖然不影響功能，但總歸不太好吧~~
If InStr(page,M_Item)=0 Then
M_ItemUrl = M_ItemUrl & M_Item &"="& Server.URLEncode(Request.QueryString(""&M_Item&""))
else
M_ItemUrl = M_ItemUrl & M_Item &"="& Server.URLEncode(Request.QueryString(""&M_Item&"")) & "&"
End If
Next
Else
scriptAddress = scriptAddress & "?"
end if
GetUrl = scriptAddress & M_ItemUrl
End Function

上面的代碼得到的地址為：
http://dxy.com:8082/test/geturl.asp?Param-VR52tmx3syn03777.html

基本上差不多，如果只是為了得到?號后面的東西，我們可以用下面的代碼：
response.write replace(request.querystring,".html","")

得到的就是Param-VR52tmx3syn03777，是不是滿足了我們的需要了呢。

PS：上面的所有情況只是針對純asp，如果結合urlrewrite的話，功能會有所增強，搜索的友好些，也會加強。

該文章在 2022/6/22 0:31:11 編輯過

關鍵字查詢

正在查詢...

點晴ERP是一款針對中小制造業的專業生產管理軟件系統,系統成熟度和易用性得到了國內大量中小企業的青睞。

點晴PMS碼頭管理系統主要針對港口碼頭集裝箱與散貨日常運作、調度、堆場、車隊、財務費用、相關報表等業務管理，結合碼頭的業務特點，圍繞調度、堆場作業而開發的。集技術的先進性、管理的有效性于一體，是物流碼頭及其他港口類企業的高效ERP管理信息系統。

點晴WMS倉儲管理系統提供了貨物產品管理,銷售管理,采購管理,倉儲管理,倉庫管理,保質期管理,貨位管理,庫位管理,生產管理,WMS管理系統,標簽打印,條形碼,二維碼管理,批號管理軟件。

點晴免費OA是一款軟件和通用服務都免費，不限功能、不限時間、不限用戶的免費OA協同辦公管理系統。

狠狠色丁香婷婷综合尤物/久久精品综合一区二区三区/中国有色金属学报/国产日韩欧美在线观看 - 国产一区二区三区四区五区tv

[點晴永久免費OA]asp獲取當前網址和文件名的代碼