<p> 众所周知,得到IP地址的方法是 <ccid_nobr></ccid_nobr> <pre><%=Request.ServerVariables("REMOTE_ADDR")%></pre> 可如果客户使用的代理服务器,那么用这个方法得到了就是代理服务器的IP了,下面是穿透服务器得到真实IP的代码:
<ccid_nobr></ccid_nobr> <pre>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</pre>
</p> |