关于获取客户端IP地址的问题

[hgm210]

用request.ServerVariables("REMOTE_HOST")获取的地址是::1，连IP地址的基本格式都不是，后来我在网上查到要是有代理必须使用request.ServerVariables("HTTP_X_FORWARDED_FOR")，但获取的结果还是::1，我的脚本如下：

clientip=request.ServerVariables("REMOTE_HOST")
if clientip="" then
clientip=request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if

有没有代理获取的结果都一样，请问是哪里出了问题？

[scscms太阳光]

	If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" OR InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") > 0 Then 
			c_ip = Request.ServerVariables("REMOTE_ADDR")
	ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",") > 0 Then 
			c_ip = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",")-1) 
	ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";") > 0 Then 
			c_ip = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";")-1)
	Else 
			c_ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR") 
	End If
	get_IP =Trim(Mid(c_ip, 1, 30))

[hgm210]

已经搞定了，我发现在本机上测试不行，上传到服务器可以获取客户端地址！

[hookee]

::1 获取的是IPV6的地址. 可配置系统禁用IPv6