加入收藏 | 设为首页 | 会员中心 | 我要投稿 聊城站长网 (https://www.0635zz.com/)- 智能语音交互、行业智能、AI应用、云计算、5G!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

在ASP中获取与网址、URL相关参数的程序段

发布时间:2023-08-05 14:38:13 所属栏目:Asp教程 来源:
导读:代码一:【获取地址中的文件名,不包含扩展名】

<%

dim Url,FileName,File

Url=split(request.servervariables("script_name"),"/")

FileName=Url(ubound(Url))

File=Left(FileName,InstrRev(Fi
代码一:【获取地址中的文件名,不包含扩展名】
 
<%
 
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.Cuoxin.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")
 
 

(编辑:聊城站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章