UC知道ASP如何获取带参数的完整的网页地址
来源：百度知道 编辑：UC知道 时间：2024/07/03 03:34:14
我给自己的网站http://www.cfosea.cn做了个日志文件，其中有两个字段用来记录用户登录的网站，一个网站用于记录用户进入到我网站前的网站，即想了解下用户是否是通过哪个页面链接进入到我的网站的，另一个记录的是进入我网站打开的第一个页面是哪个页.我用以下两个函数来分别提取用户登录的页面网址：
Request.ServerVariables("HTTP_REFERER")和
"http://"&Request.ServerVariables("SERVER_NAME")&Request.ServerVariables("SCRIPT_NAME")
现在问题是，假如用户进入我的网站首先打开的是这个页面:
http://www.cfosea.cn/webfiles/blogfile/readblog.asp?fixid=143
那么通过上面的函数，只能提取到网址http://www.cfosea.cn/webfiles/blogfile/readblog.asp这个部份，而后面带参数的?fixid=143部分无法获取到。
另外，Request.ServerVariables("HTTP_REFERER")好象有时能获取到带参数的网址，比如http://www.google.
Request.ServerVariables("HTTP_REFERER")和
"http://"&Request.ServerVariables("SERVER_NAME")&Request.ServerVariables("SCRIPT_NAME")
现在问题是，假如用户进入我的网站首先打开的是这个页面:
http://www.cfosea.cn/webfiles/blogfile/readblog.asp?fixid=143
那么通过上面的函数，只能提取到网址http://www.cfosea.cn/webfiles/blogfile/readblog.asp这个部份，而后面带参数的?fixid=143部分无法获取到。
另外，Request.ServerVariables("HTTP_REFERER")好象有时能获取到带参数的网址，比如http://www.google.
Function GetLocationURL()
Dim Url
Dim ServerPort,ServerName,ScriptName,QueryString
ServerName = Request.ServerVariables("SERVER_NAME")
ServerPort = Request.ServerVariables("SERVER_PORT")
ScriptName = Request.ServerVariables("SCRIPT_NAME")
QueryString = Request.ServerVariables("QUERY_STRING")
Url="http://"&ServerName
If ServerPort <> "80" Then Url = Url & ":" & ServerPort
Url=Url&ScriptName
If QueryString <>"" Then Url=Url&"?"& QueryString
GetLocationURL=server.URLEncode(Url)
End Function
这个函数没问题的，我自己用的。GetLocationURL=server.URLEncode(Url)就是将字符串按照URL标准格式化，比如空格啊问号啊是必须要转化才能正常传递的。
不太懂
其实可以通过JS 和asp结合实现
不懂 Q21616898