写个自动获取访客IP的asp代码

以下是一个简单的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地址输出到网页上。