asp获取当前完整路径(url)的函数代码

来源:脚本之家  责任编辑:小易  

id=request.QueryString("id")第一个id是自定义的

有时候我么您需要获取网址,端口、路径文件名、参数等,这里就为大家分享一下这个函数代码,需要的朋友可以参考下

URL的规则就是#表示注释。这个符号后面的内容,只有浏览器端能读到,但浏览器永远不会把它发送给服务器

函数1

你能获取实际地址就可以自行转换为重写的地址啊

<% 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 response.write GetUrl() %>

<%s_Content="http://www.baidu.com djiiji

函数2

HTTP协议的GET请求通常由浏览器地址栏提交,形式如:http://test.baidu.com

<!--获取当前页面路径-->  <%  dim str,host,url,keyword,full  str="http://";  host = Request.ServerVariables("HTTP_HOST")  url = Request.ServerVariables("PATH_INFO") '或url  keyword = Request.ServerVariables("QUERY_STRING")  if keyword <> "" then  full = str&host&url&"?"&keyword  else  full = str&host&url  end if  session("url")=full  %>

不懂你说的,有具体事例吗?有几个观点是错误的:1、电信日进亿金,成本日花销是多少?依你逻辑,国家日进可能是百亿金,不是更垄断,更剥削,该喊马云来降低税收了?要考察企业是否暴利或盈利,你去问问电信员工的收入就知道了。2、无论电信、移动、联通,新推的付费套餐都是进行了核算的,就像保险一样,有利有弊,种类繁多,令人眼花缭乱,一般人不用去频繁改变。除非明显不值。举点实例:1、我用的移动全球通近20年了,从不换号。早期很贵,通话要0.5元/1次,但看重移动基站广,通话质量好,方便工作,就选择了全球通缴费模式。现在每月流量70元/2G,前两天叫我换90元不限流量,是不是很划算?仔细一问,要限省内,出差、外

使用的话肯定选择第一个,支持https的判断。

老实说,现在已经很少能听到印度人说孟买领先上海的。至少我在印度生活过一两年,现在每年也去印度数次,一次都没有亲耳听过此类说法。这些说法的大量产生,估计主要来自十几年前在印度工作的一些中方人员(如使馆人员、中国企业)讲述的。我确实亲耳听驻印的老外交官们讲起,当时印度人确实喜欢处处与中国较劲。其实,也是可以理解的,十几年前中印经济实力对比大致在2:1,差距还没有拉开,加上印度社会整体上比较封闭,此类说法的产生也不足为奇。2012年时,我还碰到一个肯尼亚人,和我亲口说的,美国是世界第一,肯尼亚世界第二,中国要向肯尼亚学习。我懒得争辩,就点头默认他的说法了。2016年第一次去孟买,待了五天。直观的感觉

如果是通过404页面除非,这个是获取不到的,需要结合js来实现

国家提出了中国通信产业提速降费举措,是利国利民的大好事,全国人民群众欢欣鼓舞。中国三大通信运营商都积极支持,并且特别提出从2017年9月1日起取消原有移动电话国内漫游费,让利于民众,但是如何办理取消原定的本地,省内,国内长途漫游费,?是否需要本人专门去申请办理,?还是三大运营商届时自动全面办理?可就不得而知。但是,根据这些年以来,三大运营商的服务,一般百姓都不敢相信三大运营商最近来发出的高调承诺,其原因是前些年,民众被三大运营商的的营销策略忽悠得很是一头雾水。比如:营销人员推比的什么适应于不同人群的108套餐,88套餐,68套餐,有的是在活动期间用多少,返多少,有的是返50,返30,等,等,等

例如:

js页面

张家界的土家族饮食既具有浓厚的民族特色,又融合了湘菜的精华。辣,是湖南菜的特色,土家菜也不例外,除了辣以外,土家人还特别钟爱腊、酸、腌制菜食,风味独特,建议品尝一下。  张家界特色美食介绍  张家界特色菜有腊猪头、\"团年菜\"、血豆腐、合渣、酸鱼肉、泥鳅钻豆腐、乌鸡天麻汤等;风味小吃有社饭、猪血稀饭、桑植盐豆腐干、猕猴桃汁等。 岩耳炖鸡鸭:岩耳为长在陡峭的悬崖峭壁上形似木耳的一种植物,因采摘困难所以极其珍贵,味鲜美,极富营养,与鸡鸭共炖好比人岩参燕窝。色泽淡黄,闻之香味儒雅却让人不可抗拒,尝之更是口舌生津,有补身健体,美容养颜之功效。此菜自明清开始就是土司每年必献给皇上的供品,据说每年皇帝大

<script> var pathname = window.location.pathname; location.replace("/do.asp?p="+pathname); </script>

将路径传参给do.asp进行处理

strpath=Request("p")

即可获取404之前的页面,然后进行执行操作即可,注意目录权限。也可以放到404中处罚iframe进行操作。

扩展阅读,根据您访问的内容系统为您准备了以下内容,希望对您有帮助。

asp获取当前完整的url

"http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("PATH_INFO") & "?" & Request.ServerVariables("QUERY_STRING")

asp怎样获取本页完整的URL?

Request.ServerVariables("SERVER_NAME") 获取主机名Request.QueryString 获取url问号后面的所有参数名这样就可以写一个函数,来取得本页的完整的URLPrivate Function GetUrl()Dim ScriptAddress, M_ItemUrl, M_itemScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME"))M_ItemUrl = ""If (Request.QueryString <> "") ThenScriptAddress = ScriptAddress & "?"M_ItemUrl = M_ItemUrl & M_Item &"="& Server.URLEncode(Request.QueryString(""&M_Item&"")) & "&"Nextif right(M_ItemUrl,1)="&" then M_ItemUrl=left(M_ItemUrl,len(M_ItemUrl)-1)end ifGetUrl=Request.ServerVariables("SERVER_NAME")&ScriptAddress & M_ItemUrl

ASP如何获取当前URL中最后一个斜杠前的地址

<%

dim u

u=request.ServerVariables("URL")

pos=instrRev(u,"/") '找到最右边的斜线位置

u=left(u,pos-1) '截取斜线左边的内容

response.write u '输出来看看

'以上是获取相对URL,如:/msg/messages/list

'如果要绝对URL,那就在前面加上域名:request.ServerVariables("SERVER_NAME"),自已拼接吧。

%>

asp怎样获取本页完整的URL?

CStr(Request.ServerVariables("SCRIPT_NAME")) 获取本页名

Request.ServerVariables("SERVER_NAME") 获取主机名

Request.QueryString 获取url问号后面的所有参数名

这样就可以写一个函数,来取得本页的完整的URL

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

M_ItemUrl = M_ItemUrl & M_Item &"="& Server.URLEncode(Request.QueryString(""&M_Item&"")) & "&"

Next

if right(M_ItemUrl,1)="&" then M_ItemUrl=left(M_ItemUrl,len(M_ItemUrl)-1)

end if

GetUrl=Request.ServerVariables("SERVER_NAME")&ScriptAddress & M_ItemUrl

End Function

response.write "http://"&geturl

关于asp获取当前页面地址并返回的问题

这个错误发生在把url作为参数传递给login.asp的时候,浏览器会把"&ppid=1"当作login.asp的参数而不是show.asp的参数(换句话说这时候login.asp有两个参数,一个是url,另一个是ppid)!这样的话当要把url参数当成网址进行使用时,后面的ppid参数就会没有了!

事实上,当要把网址当作参数时,必须进行编码,因为网址中含有很多特殊字符(除了&,还有?、=、:、/等等),这些很容易会让服务器以及浏览器产生混淆的。最简单的编码方法就是利用ASP本身提供的URLEncode,如(假定要传递的网址保存在变量url中):

如果直接用下面的表单代码就会出现你所说的错误

<form method="post" action="login.asp?url=<%=url%>">

而改用下面的就没有错误了:<form method="post" action="login.asp?url=<%=server.urlencode(url)%>">

也可以把url用post方式提交(比如放到一个隐藏域中),不要用get方式(就是像上面这样直接放到网址后面,或者method属性设为get),这样的话系统会自动对网址进行编码的:<form method="post" action="login.asp">

<input name="url" type="hidden" value="<%=url%>">

 本人推荐尽量用最后那种方式(其中的好处之一就是参数不会出现在浏览器的地址栏中,可以增加网页的安全性)。


  • 本文相关:
  • tsys资源特性的效率提高方法
  • asp xmldom在服务器端操作xml文件的主要方法和实现
  • asp 数据库连接函数代码
  • asp中dateadd函数中日期相加或相减使用方法
  • asp是使用正则提取内容里所有图片路径src的实现代码
  • 用asp实现网页调用doc附response.contenttype 详细列表
  • asp生成带有样式的word文件方法
  • 服务器常用组件
  • 网上用的比较多的asp级联菜单效果代码
  • asp 采集实战代码
  • asp获取当前完整的url
  • asp怎样获取本页完整的URL?
  • ASP如何获取当前URL中最后一个斜杠前的地址
  • asp怎样获取本页完整的URL?
  • 关于asp获取当前页面地址并返回的问题
  • asp文件,如何获取当前页面url中的第一个参数?
  • Asp获取当前页面URL 包含#之后的内容
  • asp代码:怎样才能获取自定义重写url的路径?
  • ASP 正则取指定网页内所有的URL(链接地址)函数
  • 请问asp文件get获取url路径参数以及写出该参数的语句该怎么写?
  • 免责声明 - 关于我们 - 联系我们 - 广告联系 - 友情链接 - 帮助中心 - 频道导航
    Copyright © 2017 www.zgxue.com All Rights Reserved