asp 获取url函数小结

方法一:简单,得不到参数,只有一个虚拟路径


代码如下:

GetUrl =request("url")

例如:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
获取为:shiyan.asp


代码如下:

<%
dim changdu,url,ends,wurl
changdu=len(request.ServerVariables("URL"))
url=instrrev(request.ServerVariables("URL"),"/")
url=url+1
ends=changdu+1-url
wurl=mid(request.ServerVariables("URL"),url,ends)
%>

方法二:得到整个URL,得到参数


代码如下:

'得到当前页面的地址
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

例如:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
获取为:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd

方法三:得到虚拟路径,得到参数


代码如下:

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
If M_item = "page_num" Then Exit for '此处的作用就是过滤掉Page_num这个页次的参数(该参数是在page_turn.asp中自行设置的,根据个人设定而变),否则每次翻页都会叠加这个参数,虽然不影响功能,但总归不太好吧~~
If InStr(page,M_Item)=0 Then
M_ItemUrl = M_ItemUrl & M_Item &"="& Server.URLEncode(Request.QueryString(""&M_Item&""))
else
M_ItemUrl = M_ItemUrl & M_Item &"="& Server.URLEncode(Request.QueryString(""&M_Item&"")) & "&"
End If
Next
Else
ScriptAddress = ScriptAddress & "?"
end if
GetUrl = ScriptAddress & M_ItemUrl
End Function

例如:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
获取为:/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd

方法四:只获取参数部分字符串


代码如下:

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
geturl=mid(geturl,instr(geturl,"?")+1)
End Function

例如:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
获取为:dfsdfsf=dsfsdfd&aa=dddd

(0)

相关推荐

  • asp 获取url函数小结

    方法一:简单,得不到参数,只有一个虚拟路径 复制代码 代码如下: GetUrl =request("url") 例如:http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd 获取为:shiyan.asp 复制代码 代码如下: <% dim changdu,url,ends,wurl changdu=len(request.ServerVariables("URL")) url=instrrev(reque

  • asp获取URL参数的几种方法分析总结 原创

    需要用到这个功能,没怎么测试呢,测试后给具体代码 假如地址是: http://dxy.com:8082/test/geturl.asp?Param-VR52tmx3syn03777.html 方法一:简单,得不到参数,只有一个虚拟路径 复制代码 代码如下: GetUrl =request("url")  '这个因为我们没有url=什么字样所以直接pass掉 方法二:得到整个URL,得到参数  复制代码 代码如下: '得到当前页面的地址       Function GetUrl()  

  • asp.net Request获取url信息的各种方法比较

    本页地址: Request.URL; 上页地址: 复制代码 代码如下: Request.UrlReferrer Request.ServerViables["http_referer"] Request.RawUrl Request.RawUrl.QueryAndPath System.IO.Path.GetFileName(Request.FilePath.ToString()) 在ASP.NET编程中经常需要用Request获取url的有关信息,Request中有多种方法获取 ur

  • PHP获取当前页面URL函数实例

    本文实例讲述了PHP获取当前页面URL函数实例,分享给大家供大家参考.具体实现方法如下: 在PHP中,没有默认的Function来获取目前所在页面的URL,所以今天就向大家介绍一个在PHP获取当前页面完整URL的PHP函数. 函数代码如下,调用时只需要使用 curPageURL() 就行啦: 复制代码 代码如下: /* 获得当前页面URL开始 */ function curPageURL() {     $pageURL = 'http';     if ($_SERVER["HTTPS&quo

  • PHP自定义函数获取URL中一级域名的方法

    本文实例讲述了PHP自定义函数获取URL中一级域名的方法.分享给大家供大家参考,具体如下: <?php /* * Created on 2016-8-23 */ function regular_domain($domain) { if (substr ( $domain, 0, 7 ) == 'http://') { $domain = substr ( $domain, 7 ); } if (strpos ( $domain, '/' ) !== false) { $domain = sub

  • vue 获取url里参数的两种方法小结

    我就废话不多说了,大家还是直接看代码吧~ 第一种: const query = Qs.parse(location.search.substring(1)) let passport = query.passport; 第二种: var query=this.$route.query; let lat = query.lat; 补充知识:Vue通过query获取路由参数 现在来讲Vue通过query获取路由参数 可以看见com1组件里的路由参数为 name=zhangsan&job=teache

  • ASP.NET MVC从控制器中获取URL值

    从控制器中获取URL的值有三种方式: 1.使用Request.QueryString[] 例如: string value = Request.QueryString["BookId"].ToString(); 注意:Request.QueryString只能获取URL中以?分割的参数值. 案例演示: action方法代码如下: #region 1.通过Request.QueryString的方式获取URL的值 public ActionResult Index() { // 获取路由

  • asp中将字符串转数字的函数小结

    常常因为一些小地放的失误导致整个程序瘫痪.今天就遇到了.一个商城系统.因为计算整得我改了N久 在此记下这些数据转换的函数 cstr()转换成字符串 cint()转换成数字 先用isnumberic函数判断 clng()转换为 Long 类型的 Variant(推荐使用clng代替cint,尤其是文章id等可能出现大于65536的数字) 整形--转字符形用:cstr()函数 字符形转整形用:cint()函数 字符形转长整形用:clng()函数 函数列表 CBool Boolean 任何有效的字符串

  • ASP.NET MVC从控制器中获取URL值

    从控制器中获取URL的值有三种方式: 1.使用Request.QueryString[] 例如: string value = Request.QueryString["BookId"].ToString(); 注意:Request.QueryString只能获取URL中以?分割的参数值. 案例演示: action方法代码如下: #region 1.通过Request.QueryString的方式获取URL的值 public ActionResult Index() { // 获取路由

  • JS request函数 用来获取url参数

    复制代码 代码如下: function request(strParame) { var args = new Object( ); var query = location.search.substring(1); var pairs = query.split("&"); // Break at ampersand for(var i = 0; i < pairs.length; i++) { var pos = pairs[i].indexOf('='); if (

随机推荐