<%
'*******************************
'기능 : getUserTrueip ()
'매개 변수 : 없음
'저자 : Alixi
'날짜 : 2007/7/13
'설명 : 사용자의 실제 IP를 얻으 며 여전히 프록시 주소에 유효합니다. 반환 값 : 텍스트 유형 IP 주소
'예 : <%= getUserTrueip ()%>
'*******************************
functiongetUserTrueip ()
Dimstripaddr
ifrequest.servariables ( "http_x_forwarded_for") = ""orinst (request.servervariables ( "http_x_forwarded_for"), "알 수없는")> 0then
stripaddr = request.servervariables ( "remote_addr")
elseifinstr (request.servervariables ( "http_x_forwarded_for"), ",", ")> 0then
stripaddr = mid (request.servariables ( "http_x_forwarded_for"), 1, instr (request.servervariables ( "http_x_forwarded_for"), ")-1)
elseifinstr (request.servervariables ( "http_x_forwarded_for"), ";")> 0then
stripaddr = mid (request.servariables ( "http_x_forwarded_for"), 1, instr (request.servervariables ( "http_x_forwarded_for"), ")-1)
또 다른
stripAddr = request.servariables ( "http_x_forwarded_for")
endif
getusertrueip = trim (Mid (stripaddr, 1,30))
최종 기능 장애
%>