asp限制域名访问实现代码(acl限制ip访问服务器)这都可以?

随心笔谈1年前发布 编辑
161 0



asp 设置只能指定域名可以使用此网站

代码一 脚本之家原创

<%
myIp=”,127.0.0.1,localhost,www.jb51.net,”
myurl=request.ServerVariables(“SERVER_NAME”)
Response.write myurl
if InStr(myIp,”,”&myurl&”,”)>0 then
Response.write “域名合法”
else
Response.write “域名不合法”
end if
%>

代码二

myIp=Array(“127.0.0.1″,”jb51”)
myHou=new Array(“”,”.com”)
myDirect=”http://www.jb51.net/”
ip=request.ServerVariables(“HTTP_HOST”)
j=0
for i=0 to ubound(myIp)
‘Response.Write(i&”–“&myIp(i)&”<br>”)
if InStr(ip,myIp(i)&myHou(i))>0 then
‘Response.Write(myIp(i)&”==”)
j=j+1
end if
next
if j<1 then
response.Redirect(myDirect)
end if

上面的代码用到了下面的资料

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

您可能感兴趣的文章:PHP实现限制域名访问的实现代码(本地验证)

© 版权声明

相关文章