관리자 페이지 IP 제한

<%
If myfunc_userauth(userid, userpw) <> 1 Then 'DB에서 사용자 인증을 처리
Response.write "인증 실패"
Else
If Request.ServerVariables("REMOTE_ADDR") <> "10.10.1.1" Then '관리자 IP 확인
Response.write "관리자 IP가 아닙니다."
Response.write "인증실패“
LogSave(userid, user_ip, 0) '접속에 실패한 ID 및 IP 기록
Else
Session("logged_in") = 1 '인증에 성공했을 경우 logged_in 에 1의 값을 세팅
Session("userid") = userid
Session("user_ip") = Request.ServerVariables("REMOTE_ADDR")
LogSave($userid, $user_ip) '접속에 사용한 ID 및 IP 기록
... 중략 ...
End If
End If
%>