'*******************************
'functioncheckip (cinput_ip, cbound_ip)
'createdByqqdao, [email protected]/11/28
'참고 : 먼저, 당신은; 숫자, "-"가 포함되어 있는지 여부를 결정하십시오.
'매개 변수 : cinput_ip, 프록시 점검을위한 IP
'cbound_ip, 주어진 범위 형식은 단일 IP 및 범위 IP, 범위 IP는 마지막으로 분할하는 데 사용되며 "*"인 경우 마지막 숫자에 배치해야합니다.
'추가 ": 허용"각 범위가 로그인이 허용되고 추가 된 후 ": refuse"는 로그인이 거부되었음을 의미합니다. 여러 범위를 사용하여 분리하십시오
'예를 들어 192.168.1*.*: 허용; 192.168.1.1 : 홀로; 192.168.1.1-10 : 거부 "
'반환 값 : true/false
'업데이트 : 2001/12/05 지원 허용, 거부 지원'*', 옳고 싶지 않습니까? 거의 동일하기 때문에 지원됩니다.
'*******************************
functioncheckip (cinput_ip, cbound_ip)
Dimcsingle_ip, ctemp_ip, cstart_ip, cend_ip
checkip = false
csingle_ip = split (cbound_ip, ";")
fori = 0toubound (csingle_ip)
ifinstr (csingle_ip (i), "거부") <> 0then "그냥 거부합니다
ctemp_ip = left (csingle_ip (i), inst (csingle_ip (i), ":") -1)
ifinstr (ctemp_ip, "*") <> 0then "은 넓은 범위입니다
cstart_ip = 왼쪽 (ctemp_ip, instr (ctemp_ip, "*") -1)
ifleft (cinput_ip, len (cstart_ip)) = cstart_ipthen
checkip = false
종료 기능
endif
endif
ifinstr (ctemp_ip, "-") = 0then
cstart_ip = ctemp_ip
cend_ip = ctemp_ip
또 다른
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)
endif
ifip2str (cinput_ip)> = ip2str (cstart_ip) andip2str (cinput_ip) <= ip2str (cend_ip)
checkip = false
종료 기능
endif
elseifinstr (csingle_ip (i), "allow") <> 0then "허용
ctemp_ip = left (csingle_ip (i), inst (csingle_ip (i), ":") -1)
ifinstr (ctemp_ip, "*") <> 0then "은 넓은 범위입니다
cstart_ip = 왼쪽 (ctemp_ip, instr (ctemp_ip, "*") -1)
ifleft (cinput_ip, len (cstart_ip)) = cstart_ipthen
checkip = true
endif
endif
ifinstr (ctemp_ip, "-") = 0then
cstart_ip = ctemp_ip
cend_ip = ctemp_ip
또 다른
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)
endif
ifip2str (cinput_ip)> = ip2str (cstart_ip) andip2str (cinput_ip) <= ip2str (cend_ip)
checkip = true
또 다른
checkip = false
endif
endif
다음
최종 기능 장애
'*******************************