正則表達(dá)式檢查來訪IP是否合法的實際應(yīng)用
更新時間：2007年04月06日 00:00:00 作者：
正則表達(dá)式檢查來訪IP是否合法的實際應(yīng)用
sub chkIP(boardid)
dim rsIP
dim ipArr
dim ignored
dim i
dim ip
dim sql
ip=Request.ServerVariables("REMOTE_ADDR")
ignored=false
if not isempty(boardid) then
sql="select ignoreip from board where boardid="&cstr(boardid)
set rsIP=conn.execute(sql)
if not (rsIP.eof and rsIP.bof) then
if instr(cstr(rsIP("ignoreip")&""),chr(13)&chr(10)) then
iparr=split(rsIP("ignoreip"),chr(13)&chr(10))
for i=0 to ubound(iparr)
if trim(iparr(i))<>"" and left(ip,len(trim(iparr(i))))=trim(iparr(i)) then
ignored=true
exit for
end if
next
else
iparr=rsIP("ignoreip")
if ip=trim(iparr) then
ignored=true
end if
end if
end if
rsIP.close
end if
if ignored then
response.write "<script language=javascript>window.location.href='ignoreip.htm'</script>"
end if
end sub
sub chkIP(boardid)
dim rsIP
dim ipArr
dim ignored
dim i
dim ip
dim sql
ip=Request.ServerVariables("REMOTE_ADDR")
ignored=false
if not isempty(boardid) then
sql="select ignoreip from board where boardid="&cstr(boardid)
set rsIP=conn.execute(sql)
if not (rsIP.eof and rsIP.bof) then
if instr(cstr(rsIP("ignoreip")&""),chr(13)&chr(10)) then
iparr=split(rsIP("ignoreip"),chr(13)&chr(10))
for i=0 to ubound(iparr)
if trim(iparr(i))<>"" and left(ip,len(trim(iparr(i))))=trim(iparr(i)) then
ignored=true
exit for
end if
next
else
iparr=rsIP("ignoreip")
if ip=trim(iparr) then
ignored=true
end if
end if
end if
rsIP.close
end if
if ignored then
response.write "<script language=javascript>window.location.href='ignoreip.htm'</script>"
end if
end sub
相關(guān)文章
收集一些常用的正則表達(dá)式（匹配中文字符、匹配雙字節(jié)字符、匹配HTML標(biāo)記、匹配空行 and so on~~~）
正則表達(dá)式用于字符串處理，表單驗證等場合，實用高效，應(yīng)用廣泛，但用到時總是不太把握，以致往往要上網(wǎng)查一番資料，下面把我搜素資料加工整理分享給大家，需要參考的朋友可以借鑒下2015-09-09
JS正則表達(dá)式必須包含數(shù)字、字母、特殊字符
這篇文章主要介紹了JS正則表達(dá)式必須包含數(shù)字、字母、特殊字符的相關(guān)資料,文中還給大家提到了js 正則表達(dá)式 匹配除漢字，字母，數(shù)字，逗號，句號外的特殊字符（用來規(guī)范輸入內(nèi)容） 需要的朋友可以參考下2019-08-08
editplus EmEditor和searchandreplace正則表達(dá)式
掌握下面的正則方便我們快速的批量處理文本替換。2009-07-07
今天學(xué)習(xí)了正則表達(dá)式，覺得非常實用，而且現(xiàn)在各種編程語言和應(yīng)用軟件如Word、MySQL等等也都內(nèi)置了正則引擎。2008-12-12
正則表達(dá)式是煩瑣的，但是強(qiáng)大的，學(xué)會之后的應(yīng)用會讓你除了提高效率外，會給你帶來絕對的成就感。只要認(rèn)真去閱讀這些資料，加上應(yīng)用的時候進(jìn)行一定的參考，掌握正則表達(dá)式不是問題2006-10-10
這篇文章主要介紹了正則表達(dá)式環(huán)視概念與用法,具體分析了環(huán)視的概念、分類、使用方法及相關(guān)注意事項,需要的朋友可以參考下2017-06-06
在ASP中用正則表達(dá)式對象來校驗數(shù)據(jù)的合法性
我們在制作網(wǎng)站的時候,需要對用戶輸入的數(shù)據(jù)進(jìn)行驗證，前端是輔助用戶方便填寫，后端才是真正的安全過濾，正則表達(dá)式對于一些數(shù)據(jù)校驗都是比較常見的不只asp中需要，php也需要，這里腳本之家小白就為大家簡單介紹一下2006-06-06
正則表達(dá)式(Regular Expression, abbr. regex) 功能強(qiáng)大，能夠用于在一大串字符里找到所需信息。2009-11-11
正則表達(dá)式中對各字符集編碼范圍的總結(jié)...2007-03-03
這篇文章主要介紹了正則表達(dá)式30分鐘入門教程,需要的朋友可以參考下2007-03-03