首页 相关文章 用通ASP直接获取用户真实IP地址

用通ASP直接获取用户真实IP地址

通用FUNCTION,如果不能取真实IP,就会取代理IP

Private Function getIP()

Dim strIPAddr
If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" OR InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") 0 Then
strIPAddr = Request.ServerVariables("REMOTE_ADDR")
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",") 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",")-1)
ElseIf InStr(Request.Server...[ 查看全文 ]

2016-01-29 标签:

用通ASP直接获取用户真实IP地址的相关文章

手机页面
收藏网站 回到头部