正则判断ip是否合法（正则表达式判断ip）

正则表达式检查来访IP是否合法的实际应用

1. subchkIP(boardid)
2. dimrsIP
3. dimipArr
4. dimignored
5. dimi
6. dimip
7. dimsql
8. ip=Request.ServerVariables("REMOTE_ADDR")
9. ignored=false
10. ifnotisempty(boardid)then
11. sql="selectignoreipfromboardwhereboardid="&cstr(boardid)
12. setrsIP=conn.execute(sql)
13. ifnot(rsIP.eofandrsIP.bof)then
14. ifinstr(cstr(rsIP("ignoreip")&""),chr(13)&chr(10))then
15. iparr=split(rsIP("ignoreip"),chr(13)&chr(10))
16. fori=0toubound(iparr)
17. iftrim(iparr(i))<>""andleft(ip,len(trim(iparr(i))))=trim(iparr(i))then
18. ignored=true
19. exitfor
20. endif
21. next
22. else
23. iparr=rsIP("ignoreip")
24. ifip=trim(iparr)then
25. ignored=true
26. endif
27. endif
28. endif
29. rsIP.close
30. endif
31. ifignoredthen
32. response.write"<scriptlanguage=javascript>window.location.href='ignoreip.htm'</script>"
33. endif
34. endsub

如果您对该产品感兴趣，请填写办理（客服微信：xiaoxiongyidong）

您的姓名 *

身份证号码 *

手机号码 *

选择地区 *

详细地址 *

留言备注 *