资源描述:
《限制ip段访问的方法》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、1.求一个ASP限制IP段访问的代码求一个ASP限定IP段的代码,列如可以限制127.0.0.1-127.255.255.255内的IP禁止访问该页面!其他回答共1条2008-11-1120:06lzp4881
2、八级<%ifcheckIP()thenxmlStr=xmlStr&"true
合法用户欢迎光临!"elsexmlStr=xmlStr&"
false系统提示3、>非法用户,你没有使用本系统的权限!如有疑问,请与系统管理员联系。"endifresponse.writexmlStr%><%functioncheckIP()Dimvip:vip=cip(getIP())DimgcSQL:gcSQL="gc_checkIP"&vipOpenConn()Dimrs:Setrs=conn.execute(gcSQL)ifrs.eofandrs.bofthencheckIP=falseelsecheckIP=trueendifCo(rs)CloseConn()en
4、dfunctionfunctioncip(sip)dimtip:tip=cstr(sip)dimsip1,sip2,sip3,sip4sip1=left(tip,cint(instr(tip,".")-1))tip=mid(tip,cint(instr(tip,".")+1))sip2=left(tip,cint(instr(tip,".")-1))tip=mid(tip,cint(instr(tip,".")+1))sip3=left(tip,cint(instr(tip,".")-1))sip4=mid(tip,cint(in
5、str(tip,".")+1))cip=cint(sip1)*256*256*256+cint(sip2)*256*256+cint(sip3)*256+cint(sip4)endfunctionfunctiongetIP()getIP=Request.ServerVariables("HTTP_X_FORWARDED_FOR")IfgetIP=""ThengetIP=Request.ServerVariables("REMOTE_ADDR")endfunction%>2.问:asp程序该怎么写才能同时限制网站除了下面这几段ip别
6、的人都不能访问?·楼主发表于:2005-01-2110:57:07202.117.0.0-202.117.63.255202.117.160.0-202.117.160.255202.117.175.0-202.117.175.255·hollandhut·(荷兰小屋)··等 级:·结帖率:100.00%·202.117.200.0-202.117.200.255202.117.223.0-202.117.223.255202.200.224.0-202.200.224.255202.200.239.0-202.200.239.2
7、55202.219.245.32-202.219.245.47202.219.245.128-202.219.245.191上面这几段ip之外的站都不能访问因该怎么写?··chang1216·(医药行业的程序混混)··等 级:·#1楼得分:0回复于:2005-01-2111:04:09if left(request.ServerVariables("REMOTE_ADDR"),11)<>"202.117.160" or left(request.ServerVariables("REMOTE_ADDR"),11)<>"202.11
8、7.175" thenresponse.Write("
抱歉,您无权查看!")response.Endend if·#2楼得分:0回复于:2005-01-2111:09:07·znjgress·(四空和尚)··等 级:·ip限制函数'******************************'Function CheckIp(cInput_Ip,cBound_Ip)'Created by qqdao, qqdao@263.net 2001/11/28'说明:首先需要根据;号循环,然后判断是否含有
9、"-",如果有则进行拆分处理,最后判断是否在范围内'参数: cInput_Ip,代检查的ip' cBound_Ip,给定的范围格式为,单个ip,和范围ip,范围ip最后使用”-“分割,如果是“*”则必须放到最后一位'