用ASP代碼實(shí)現(xiàn)對(duì)IP的訪問限制的代碼
更新時(shí)間:2007年03月22日 00:00:00 作者:
這是以前用ASP寫的,本想改成ASP.net的給大家,后來想大家能看懂算法就行了。IP比對(duì)的關(guān)鍵是IP地址的線性化,下面就是代碼。
'可以進(jìn)入的ip
'218.7.44.0 - 218.7.45.253
'61.180.240.0 - 61.180.240.253
'202.118.208.0 - 202.118.223.253
'
'218.7.44.0 3657903103
'218.7.45.253 3657903612
'
'61.180.240.0 1035268095
'61.180.240.253 1035268348
'
'202.118.208.0 3396784127
'202.118.223.253 3396788220
ip=request.servervariables("remote_addr")
sip=split(ip,".")
num=cint(sip(0))*256*256*256+cint(sip(1))*256*256+cint(sip(2))*256+cint(sip(3))-1
response.write(ip)
response.write("<br>")
if ((num>=3657903103 and num<=3657903612) or (num>=1035268095 and num<=1035268348)
or (num>=3396784127 and num<=3396788220)) then
response.write("抱歉,您的ip不合法!")
response.End()
else
response.write("您的ip合法")
end if
復(fù)制代碼 代碼如下:
'可以進(jìn)入的ip
'218.7.44.0 - 218.7.45.253
'61.180.240.0 - 61.180.240.253
'202.118.208.0 - 202.118.223.253
'
'218.7.44.0 3657903103
'218.7.45.253 3657903612
'
'61.180.240.0 1035268095
'61.180.240.253 1035268348
'
'202.118.208.0 3396784127
'202.118.223.253 3396788220
ip=request.servervariables("remote_addr")
sip=split(ip,".")
num=cint(sip(0))*256*256*256+cint(sip(1))*256*256+cint(sip(2))*256+cint(sip(3))-1
response.write(ip)
response.write("<br>")
if ((num>=3657903103 and num<=3657903612) or (num>=1035268095 and num<=1035268348)
or (num>=3396784127 and num<=3396788220)) then
response.write("抱歉,您的ip不合法!")
response.End()
else
response.write("您的ip合法")
end if
相關(guān)文章
HTML css標(biāo)準(zhǔn)驗(yàn)證工具
HTML css標(biāo)準(zhǔn)驗(yàn)證工具...2007-03-03一個(gè)小巧實(shí)用的asp cms ---- NCMS
一個(gè)小巧實(shí)用的asp cms ---- NCMS...2007-05-05IncrediMail Xe Premium v5.6.5 Build 3054 多國語言版 下載
IncrediMail Xe Premium v5.6.5 Build 3054 多國語言版 下載...2007-07-07硬盤監(jiān)控工具 HDDlife Pro v2.9.110 +漢化版 下載
硬盤監(jiān)控工具 HDDlife Pro v2.9.110 +漢化版 下載...2007-04-04WinHex 13.8 SR-4簡(jiǎn)體中文霏凡會(huì)員版 下載
WinHex 13.8 SR-4簡(jiǎn)體中文霏凡會(huì)員版 下載...2007-03-03Sothink SWF Decompiler MX 3.6 Build 70208下載
碩思閃客精靈是一款能解析SWF并能將SWF文件還原為FLA文件的專業(yè)工具2007-03-03Crack Searching AIO (by avg) 下載
這篇文章主要介紹了Crack Searching AIO (by avg) 下載2007-05-05動(dòng)力文章管理完整版,絕對(duì)商業(yè)正版 提供下載了
動(dòng)力文章管理完整版,絕對(duì)商業(yè)正版 提供下載了...2007-03-03