ASP获得用户真实IP的功能，代理地址仍然有效。

<
******************************
功能：GetUserTrueIP（）
参数：否
作者：Ali Cici
日期：2007 7 13
描述：获取用户真正的IP，对代理地址仍然有效；返回值：文本类型的IP地址
的例子：
******************************
GetUserTrueIP（）函数
昏暗的stripaddr
如果Request.ServerVariables（http_x_forwarded_for ）=或仪器（request.servervariables（http_x_forwarded_for ），未知）> 0
stripaddr = request.servervariables（remote_addr ）
ElseIf InStr（request.servervariables（， http_x_forwarded_for ）
stripaddr =中（request.servervariables（http_x_forwarded_for ），1，（request.servervariables工具（， http_x_forwarded_for ）
ElseIf InStr（request.servervariables（http_x_forwarded_for ），；）> 0
stripaddr =中（request.servervariables（http_x_forwarded_for ），1，（request.servervariables仪器（http_x_forwarded_for ），；）- 1）
其他的
stripaddr = request.servervariables（http_x_forwarded_for ）
最后如果
getusertrueip =装饰（MID（stripaddr，1, 30））
端功能
%>