asp限制域名访问实现代码

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 ="//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获取当前域名和端口号方法

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