<%
'*******************************
'기능 : userip ()
'매개 변수 : 없음
'저자 : Alixi
'날짜 : 2007/7/12
'설명 : 클라이언트 IP 주소를 얻습니다
'예 : <%= userip ()%>
'*******************************
functionuserip ()
dimgetclientip
'클라이언트가 프록시 서버를 사용하는 경우 ServerVariables ( "http_x_forwarded_for") 메소드를 사용해야합니다.
getClientip = request.servariables ( "http_x_forwarded_for")
ifgetClientip = ""Orisnull (getClientip) orisempty (getClientip)
'클라이언트가 프록시를 사용하지 않으면 request.servervariables ( "remote_addr") 메소드를 사용해야합니다.
getClientip = request.servervariables ( "remote_addr")
endif
userip = getClientIP입니다
최종 기능 장애
%>
IP 주소 기능을 변환합니다
코드 사본은 다음과 같습니다.
<%
'*******************************
'기능 : CIP (SIP)
'매개 변수 : SIP, IP 주소
'저자 : Alixi
'날짜 : 2007/7/12
'설명 : IP 주소 기능을 변환합니다
'예 : <%= cip ( "219.16.73.120")%>
'*******************************
functioncip (sip)
팁 = CSTR (SIP)
sip1 = 왼쪽 (팁, 고린 (instr (팁, ".))))
팁 = 중간
sip2 = 왼쪽 (팁, 고린 (instr (팁, ".)))))
팁 = 중간
sip3 = 왼쪽 (팁, int (instr (팁, ".")-1))
SIP4 = 중간
CIP = CINT (SIP1)*256*256*256+CINT (SIP2)*256*256+CINT (SIP3)*256+CINT (SIP4)
최종 기능 장애
%>