智睿软件_技术交流论坛综合站长Web程序开发 → Asp获取网址相关参数大全


  共有19104人关注过本帖树形打印

主题:Asp获取网址相关参数大全

帅哥哟,离线,有人找我吗?
zhirui
  1楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:520 积分:8740 威望:0 精华:5 注册:2009-07-07
Asp获取网址相关参数大全  发帖心情 Post By:2012-10-25 22:12:23

代码一:【获取地址中的文件名,不包含扩展名】
<%
dim Url,FileName,File

Url=split(request.servervariables("script_name"),"/")
FileName=Url(ubound(Url))
File=Left(FileName,InstrRev(FileName,".")-1)

Response.Write "文件名:"& File
%>

代码二:【获取地址参数】
<%
dim url
url=url&"http://"&request.ServerVariables("Server_NAME")&request.ServerVariables("SCRIPT_NAME")

response.Write url
%>

代码三:【获取全部地址参数,包括?及后面的参数】
<%
dim url
url=url&"http://"&request.ServerVariables("Server_NAME")&request.ServerVariables("SCRIPT_NAME")

if(len(trim(request.ServerVariables("QUERY_STRING")))>0) then
url=url & "?" & request.ServerVariables("QUERY_STRING")
end if

response.Write url
%>

<%
If Request.QueryString.Count>0 Then

For each querystring in Request.QueryString 
   query = query+querystring&"="&Request.QueryString(querystring)&"&"
Next 
   query = mid(query,1,len(query)-1) 
   Response.Write "http://"&Request.ServerVariables("SERVER_NAME")&Request.ServerVariables("PATH_INFO")&"?"&query 
Else 
   Response.Write "http://"&Request.ServerVariables("SERVER_NAME")&Request.ServerVariables("PATH_INFO")

End If
%>

 

域名完整地址:【包括 http://       和域名尾部的 / 】
<%
Response.write "http://" & Request.ServerVariables("HTTP_HOST") & Mid(Request.ServerVariables("URL"),1,InStrRev(Request.ServerVariables("URL"),"/"))
%>

获取域名地址
Request.ServerVariables("HTTP_HOST")        形如:www.kenqiao.com 域名

获取页面地址
Request.ServerVariables("URL")                      形如:/index.asp
request.servervariables("script_name")           形如:/index.asp

<%response.write Request.ServerVariables("REMOTE_ADDR")%> 获取客户端IP地址
<%=Request.ServerVariables("LOCAL_ADDR")%>                            获取服务器IP地址

<a href="<%=request.serverVariables("Http_REFERER")%>">返回前页</a>
可获取父页面地址,然后进行处理。

‘asp 获取网页地址及参数。ServerVariables("HTTP_HOST")
‘获取域名keyword = Request.ServerVariables("QUERY_STRING")
‘获取参数集variable = Request.ServerVariables("PATH_INFO")

 

代码一:【取得当前页】
pageName=Mid(Request.ServerVariables("SCRIPT_NAME"),InStrRev(Request.ServerVariables("SCRIPT_NAME"),"/")+1)


政府公安政府系统,专注于政府媒体,公安公众信息系统 支持(0中立(0反对(0回到顶部
帅哥哟,离线,有人找我吗?
zhirui
  2楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:520 积分:8740 威望:0 精华:5 注册:2009-07-07
  发帖心情 Post By:2012-10-25 22:50:04

pageName=Mid(Request.ServerVariables("SCRIPT_NAME"),InStrRev(Request.ServerVariables("SCRIPT_NAME"),"/")+1)


url=request.ServerVariables("HTTP_REFERER")
host=split(url,"/")(3)


国际域名60元,空间八折优惠,企业的顶级合作伙伴 支持(0中立(0反对(0回到顶部
帅哥哟,离线,有人找我吗?
zhirui
  3楼 个性首页 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:520 积分:8740 威望:0 精华:5 注册:2009-07-07
  发帖心情 Post By:2012-11-05 14:50:43

asp获取当前域名方法

asp获取当前域名从来就不是什么有难度的事情,但是在实际项目使用中,大家获取的具体URL信息可能是不同的,各个方法获取见下表,而如果要获取当前域名,可以看下面加粗部分:

Request.ServerVariables("SERVER_NAME")'当前域名
Request.ServerVariables("SERVER_PORT")'当前端口
Request.ServerVariables("SCRIPT_NAME")'当前文件名
Request.ServerVariables("QUERY_STRING")'当前页面的传入参数
Request.ServerVariables("HTTP_USER_AGENT")'取得当前浏览器信息
request("remote_addr")'取得IP
Request.ServerVariables("HTTP_REFERER")'上个页面地址
Request.ServerVariables("HTTP_HOST")'获取当前域名

当采用SERVER_NAME时返回的是不带端口号的URL。

 


支持(0中立(0反对(0回到顶部