ASP 获取访客IP地址代码示例

<% Dim UserIPAddress UserIPAddress = Request.ServerVariables('HTTP_X_FORWARDED_FOR') If UserIPAddress = "" Then UserIPAddress = Request.ServerVariables('REMOTE_ADDR') End If Response.Write('您的IP地址是：' & UserIPAddress) %>

在上述代码中，首先尝试获取HTTP_X_FORWARDED_FOR头部，这是代理服务器发送给Web服务器的客户端IP地址列表。如果该头部不存在或为空，则获取REMOTE_ADDR头部，它包含了访客的IP地址。

最后，使用Response.Write将IP地址输出到网页上。