4.12 ASP如何获取客户端真实IP地址

飞天爱绿茶

飞天爱绿茶

2016-02-19 14:02

下面图老师小编跟大家分享4.12 ASP如何获取客户端真实IP地址,一起来学习下过程究竟如何进行吧!喜欢就赶紧收藏起来哦~

要想透过代理服务器取得客户端的真实IP地址,就要使用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 来读取。不过要注意的事,并不是每个代理服务器都能用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 来读取客户端的真实 IP,有些用此方法读取到的仍然是代理服务器的IP。还有一点需要注意的是:如果客户端没有通过代理服务器来访问,那么用 Request.ServerVariables ("HTTP_X_FORWARDED_FOR") 取到的值将是空的。因此,如果要在程序中使用此方法,可以这样处理:

  ......

  userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")

  If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")

  ......   

  即:如果客户端通过代理服务器,则取 HTTP_X_FORWARDED_FOR 的值,如果没通过代理服务器,就取 REMOTE_ADDR 的值。   

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/webkaifa/)

  '通用函数:如果不能取客户端真实IP,就会取客户端的代理IP

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/webkaifa/)

 

  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.ServerVariables("HTTP_X_FORWARDED_FOR"), ";") 0 Then

  strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";")-1)

  Else

  strIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")

  End If

  getIP = Trim(Mid(strIPAddr, 1, 30))

  End Function

展开更多 50%)
分享

猜你喜欢

4.12 ASP如何获取客户端真实IP地址

Web开发
4.12 ASP如何获取客户端真实IP地址

ASP如何获取客户端真实IP

Web开发
ASP如何获取客户端真实IP

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

ASP获取客户端MAC地址

ASP
ASP获取客户端MAC地址

ASP如何获取真实IP地址

ASP
ASP如何获取真实IP地址

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

在ASP中获取客户端MAC地址的方法

Web开发
在ASP中获取客户端MAC地址的方法

java通过ip获取客户端Mac地址的小例子

编程语言 网络编程
java通过ip获取客户端Mac地址的小例子

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

第四章 asp网络编程4.1 用ASP编程实现网络内容快速查找

第四章 asp网络编程4.1 用ASP编程实现网络内容快速查找

5.7 ASP提速技巧

5.7 ASP提速技巧
下拉加载更多内容 ↓