• 您現(xiàn)在的位置： 創(chuàng)新互聯(lián) >> 網(wǎng)站建設(shè) >> 網(wǎng)絡(luò)建設(shè)常見問題 >> Asp限制IP訪問，阻止某一個IP段禁止訪問本站的代碼

Asp限制IP訪問，阻止某一個IP段禁止訪問本站的代碼

• 作者：曾小姐 文章來源：成都網(wǎng)站建設(shè) 點擊數(shù)：1638 更新時間：2012-04-01
• 　　大家在一些博客和論壇發(fā)布外鏈的時候，是否遇到過一不小心賬號甚至IP就被封殺了呢？小編以前也挺好奇的，賬號也就算啦，為什么連IP也能識別呢？今天，創(chuàng)新互聯(lián)小編就來跟大家講講這其中的奧秘。
  <%
  '獲取訪問者的地址
  ip=Request.ServerVariables("REMOTE_ADDR")
  '允許的IP地址段為10.0.0.0～10.68.63.255
  allowip1="10.0.0.0"
  allowip2="10.68.10.71"
  response.writecheckip(ip,allowip1,allowip2)
  functioncheckip(ip,allowip1,allowip2)
  dimcheck(4)
  checkip=false
  ipstr=split(ip,".")
  allow1=split(allowip1,".")
  allow2=split(allowip2,".")
  ifcint(allow1(0))>cint(allow2(0))then''判斷IP地址段是否合法
  response.write"禁止訪問"
  exitfunction
  endif
  fori=0toubound(ipstr)
  ifcint(allow1(i))<cint(allow2(i))then
  ifcint(allow1(i))=cint(ipstr(i))then
  check(i)=true
  checkip=true
  exitfor
  else
  ifcint(ipstr(i))<cint(allow2(i))then
  check(i)=true
  checkip=true
  exitfor
  else
  ifcint(ipstr(i))>cint(allow2(i))then
  check(i)=false
  checkip=false
  exitfor
  else
  check(i)=true
  checkip=true
  endif
  endif
  endif
  else
  ifcint(allow1(i))>cint(ipstr(i))orcint(allow1(i))<cint(ipstr(i))then
  check(i)=false
  checkip=false
  ifi<>ubound(ipstr)then
  exitfor
  endif
  else
  check(i)=true
  endif
  endif
  next
  if(check(0)=trueandcheck(1)=trueandcheck(2)=trueandcheck(3)=false)and(cint(allow2(2))>cint(ipstr(2)))the
  checkip=true
  endif
  endfunction
  %>
  如果你在網(wǎng)站制作上遇到什么難題，歡迎咨詢成都創(chuàng)新互聯(lián)網(wǎng)站建設(shè)，我們專業(yè)從事網(wǎng)站建設(shè)，網(wǎng)頁制作，域名注冊，虛擬主機(jī)，企業(yè)郵局，網(wǎng)站備案和服務(wù)器租用等項目，歡迎您的咨詢了解。您也可以登錄我們的論壇（http://bbs.cdxwcx.com）來和更多的網(wǎng)站愛好者進(jìn)行交流！
  
• 上一篇文章：asp base64編碼中文
  下一篇文章：paip.asp 項目流程及管理工具總結(jié)