한국어
일부 IP 제한 기능을 살펴본 결과 너무 복잡하다는 것을 알았습니다. 그래서 비교적 간단한 것을 하나 작성해 보았습니다. 네티즌들은 이 가이드를 참고하시기 바랍니다. 감사해요! ~
코드 복사 상자 <% '방문자 주소 가져오기 ip=Request.ServerVariables("REMOTE_ADDR") '허용 IP 주소 범위는 10.0.0.0~10.68.63.255allowip1="10.0.0.0"allowip2="10.68.10.71" response.write checkip ( ip,allowip1,allowip2) 함수 checkip(ip,allowip1,allowip2) 희미한 체크(4) checkip=false ipstr=split(ip,".")allow1=split(allowip1,".")allow2=split(allowip2," .") if cint(allow1(0))>cint(allow2(0)) then 'IP 주소 세그먼트가 적합한지 여부를 판단합니다. response.write "IP 주소 세그먼트가 잘못되었습니다!" 함수 종료 if for i=0 to ubound(ipstr ) if cint(allow1(i))<cint(allow2(i)) then if cint(allow1(i))=cint(ipstr(i)) then check(i)=true checkip=true else 종료 if cint( ipstr(i))<cint(allow2(i)) then check(i)=true checkip=true 종료 for else if cint(ipstr(i))>cint(allow2(i)) then check(i) =false checkip =false else check(i)=true checkip=true end if end if end if else if cint(allow1(i))>cint(ipstr(i)) 또는 cint(allow1(i))<cint (ipstr( i)) then check(i)=false checkip=false if i<>ubound(ipstr) then end for else if else check(i)=true if end if end if next if (check(0)=true and check(1 )=true and check(2)=true and check(3)=false) and (cint(allow2(2))>cint(ipstr(2))) then checkip=true end if end function %>
