通用FUNCTION,如果不能取真实IP,就会取代理IP Private Function getIP() Dim strIPAddr If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" OR InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") 0 Then strIPAddr = Request.ServerVariables("REMOTE_ADDR") E...[ 查看全文 ]