ASP如何获取地址栏的URL地址急!

zzs_2013 2004-11-25 10:30:51

ASP如何获取地址栏的URL地址.

...全文

241 9 打赏收藏转发到动态举报

写回复

用AI写文章

9 条回复

切换为时间正序

请发表友善的回复…

发表回复

cheng17 2004-11-26

打赏
举报

response.Write request.ServerVariables("HTTP_REFERER") ，记录上一页来源

samyan 2004-11-26

打赏
举报

Request.ServerVariables("URL")&"?"request.querystring

request.ServerVariables("HTTP_REFERER")

cmslovehxh 2004-11-26

打赏
举报

request.ServerVariables("HTTP_REFERER")

dachangtui 2004-11-25

打赏
举报

用 Jaron(good,better,best) 的没错

hflsj 2004-11-25

打赏
举报

顶一下，支持

zzs_2013 2004-11-25

打赏
举报

我需要把http://www.sinue.com/article/article.asp?article_id=195
一起记录下来
用Request.ServerVariables("URL") 只能记录article/article.asp

sdts 2004-11-25

打赏
举报

支持楼上

笨笨兔兔兔兔兔 2004-11-25

打赏
举报

楼上你写这么麻烦是为什么??直接跟他说用Request.ServerVariables("URL") 好了*^_^*

Jaron 2004-11-25

打赏
举报

response.write geturl()

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") & "?product=CMS&"
If Trim(Request.QueryString) <> "" Then strTemp = strTemp & Trim(Request.QueryString) & "&"
GetUrl = strTemp
End Function