ip範圍限制函式
'******************************
'function checkip(cinput_ip,cbound_ip)
'created by qqdao, [email protected] 2001/11/28
'說明:首先需要根據;號迴圈,然後判斷是否含有"-",如果有則進行拆分處理,最後判斷是否在範圍內
'引數: cinput_ip,代檢查的ip
' cbound_ip,給定的範圍格式為,單個ip,和範圍ip,範圍ip最後使用」-「分割,如果是「*」則必須放到最後一位
' 每個範圍後新增":allow"表示允許登陸,新增":refuse"表示拒絕登陸。多個範圍用」;「隔開
' 例如192.168.1*.*:allow;192.168.1.1:allow;192.168.1.1-10:refuse"
'返回值: true/false
'更新:2001/12/05 支援allow,refuse支援』*『,不想對?支援,因為和*差不多
'******************************
function checkip(cinput_ip,cbound_ip)
dim csingle_ip,ctemp_ip,cstart_ip,cend_ip
checkip = false
csingle_ip=split(cbound_ip,";")
for i=0 to ubound(csingle_ip)
if instr(csingle_ip(i),"refuse") <> 0 then '就是拒絕了
ctemp_ip = left(csingle_ip(i),instr(csingle_ip(i),":")-1)
if instr(ctemp_ip,"*") <> 0 then '是寬範圍
cstart_ip = left(ctemp_ip,instr(ctemp_ip,"*")-1)
if left(cinput_ip,len(cstart_ip))=cstart_ip then
checkip = false
exit function
end if
end if
if instr(ctemp_ip,"-") = 0 then
cstart_ip = ctemp_ip
cend_ip = ctemp_ip
else
cstart_ip = left(ctemp_ip,instr(ctemp_ip,"-")-1)
cend_ip = left(cstart_ip,instrrev(cstart_ip,".")-1)+"."+mid(ctemp_ip,instr(ctemp_ip,"-")+1)
end if
if ip2str(cinput_ip)>=ip2str(cstart_ip) and ip2str(cinput_ip)<=ip2str(cend_ip) then
checkip = false
exit function
end if
elseif
end function
簡單IP限制
limitip file iplist.txt 單個ip限制 cip server remote addr 分解客戶端ip cips explode cip ip area1 cips 0 cips 1 cips 2 ip area2 cips 0 cips 1 ip area3 cips 0 rs...
限制ip操作
二 多個ip段限制 region 檢測客戶端ip是否在某一ip段內 客戶端ip 1,通過 0 不通過 public int ipexamination string clientip intksip iptoint ksip intjsip iptoint jsip intclientip ipto...
限制IP訪問
本文以python為基礎 問題描述 後台伺服器如何限制某些特定ip的訪問?問題分析 如果對ip進行限制,那麼第一步就必須得到使用者的ip,才能進行限制,第二部才是限制 問題解決 得到使用者ip 首先,python提供了獲取ip的 語句 ip request.remote addr但是通過這行 我們卻...