众所周知,得到IP地址的方法是 %=Request.ServerVariables(REMOTE_ADDR)% 可如果客户使用的代理服务器,那么用这个方法得到了就是代理服务器的IP了,下面是穿透服务器得到真实IP的代码: function GetIp() dim realip,proxy realip = Request.ServerVariable
众所周知,得到IP地址的方法是
<%=Request.ServerVariables("REMOTE_ADDR")%> |
可如果客户使用的代理服务器,那么用这个方法得到了就是代理服务器的IP了,下面是穿透服务器得到真实IP的代码:
function GetIp() dim realip,proxy realip = Request.ServerVariables("HTTP_X_FORWARDED_FOR") proxy = Request.ServerVariables("REMOTE_ADDR") if realip = "" then GetIp = proxy else GetIp = realip end if end function |