首页 > Asp > ASP获取当前页面URL地址(带参数)的方法

ASP获取当前页面URL地址(带参数)的方法

ASP获取当前页面URL地址(带参数)的方法:

'============================================
'获取当前Url参数的函数
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 ="http://"&Request.ServerVariables("Server_Name")&ScriptAddress & M_ItemUrl
End Function
'=======================================


其中的知识点为:

1、获取当前页面的脚本名称–Request.ServerVariables(“SCRIPT_NAME“)。举例:地址为https://fukun.org/sitemap.xml ,该代码获取的结果为sitemap.xml。

2、获取当前页面的服务器地址:Request.ServerVariables(“Server_Name“)。举例:地址为https://fukun.org/sitemap.xml ,该代码获取的结果为digdeeply.org。

3、获取当前页面URL的参数Request.QueryString

  1. 还没有评论
评论提交中, 请稍候...

留言

可以使用的标签: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>
Trackbacks & Pingbacks ( 0 )
  1. 还没有 trackbacks