主题:[讨论]请帮忙研究…………
以下代码为限制一个ip地址段访问的(10.22.56.X)
<%
mystr=split(Request.ServerVariables("REMOTE_ADDR"),".")
if mystr(0)="10" and mystr(1) ="22" and mystr(2)="56" then
response.write "欢迎"
else
response.redirect "jinru.asp"
end if
%>
那么如何实现可以让只有10.22.56.X 和 10.22.57.X和 10.22.58.X网段可以上网,其他的ip地址段都不可访问!
*******************************************************************
谢谢各位了!!(在帮忙看看以下代码的意思,帮忙给标注些)
<%
'这个是数组
ip="127.0.0.1|127.0.0.2"
ips="127.0.0.1"
'ips=Request.ServerVariables("remote_addr")
for i=0 to 1
if split(split(ip,"|")(i),".")(0)<>split(ips,".")(0) and
split(split(ip,"|")(i),".")(1)<>split(ips,".")(1) then
response.write "您的IP没有浏览权限!"
response.end
end if
next
%>
************************************************************
<%
ip = Request.ServerVariables("REMOTE_ADDR")
if left(ip,10) = "192.168.0." or left(ip,10) = "192.168.1." then
response.redirect "网页C"
else
response.write "出错信息"
end if
%>
<%
mystr=split(Request.ServerVariables("REMOTE_ADDR"),".")
if mystr(0)="10" and mystr(1) ="22" and mystr(2)="56" then
response.write "欢迎"
else
response.redirect "jinru.asp"
end if
%>
那么如何实现可以让只有10.22.56.X 和 10.22.57.X和 10.22.58.X网段可以上网,其他的ip地址段都不可访问!
*******************************************************************
谢谢各位了!!(在帮忙看看以下代码的意思,帮忙给标注些)
<%
'这个是数组
ip="127.0.0.1|127.0.0.2"
ips="127.0.0.1"
'ips=Request.ServerVariables("remote_addr")
for i=0 to 1
if split(split(ip,"|")(i),".")(0)<>split(ips,".")(0) and
split(split(ip,"|")(i),".")(1)<>split(ips,".")(1) then
response.write "您的IP没有浏览权限!"
response.end
end if
next
%>
************************************************************
<%
ip = Request.ServerVariables("REMOTE_ADDR")
if left(ip,10) = "192.168.0." or left(ip,10) = "192.168.1." then
response.redirect "网页C"
else
response.write "出错信息"
end if
%>