如果使用了代理上网，那么：
代理的 IP 是：
Request.ServerVariables("REMOTE_ADDR")
客户端的 IP 是：
Request.ServerVariables("HTTP_X_FORWARDED_FOR")
如果没有使用代理上网，那么：
客户端的 IP 是：
Request.ServerVariables("REMOTE_ADDR")
综合起来是，那么：
dim backgroundip, directip
backgroundip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
directip = Request.ServerVariables("REMOTE_ADDR")
if backgroundip = "" then
response.Write("<p>您没有使用代理上网。</p><p>您的 IP 是：" & directip & "</p>")
else
response.Write("<p>您使用的是代理上网。</p><p>您的代理 IP 是：" & directip & "。</p><p>您的真实 IP 是：" & backgroundip & "</p>")
end if
