| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 529 人关注过本帖
标题:ASP新手求教,如何获取客户端IP?
只看楼主 加入收藏
asp_user
Rank: 2
等 级:论坛游民
帖 子:13
专家分:10
注 册:2012-12-28
结帖率:25%
收藏
已结贴  问题点数:10 回复次数:4 
ASP新手求教,如何获取客户端IP?
我在网上找了两段代码

  一个是:
  ip = request.servervariables("http_x_forwarded_for")
  if ip = "" then
  ip = Request.ServerVariables("Remote_Addr")

  另一个是:
  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


  以上两段代码,无论哪一个我放在网站中后,它得到的都是网站的IP而不是访问网站的人的客户客户端的IP,想请教一下如何才能得到客户端的IP?谢谢!!!
搜索更多相关主题的帖子: 客户端 如何 
2012-12-28 10:50
dzt0001
Rank: 13Rank: 13Rank: 13Rank: 13
等 级:蒙面侠
威 望:5
帖 子:1281
专家分:4998
注 册:2005-10-12
收藏
得分:3 
直接用Response.Write Request.ServerVariables("REMOTE_ADDR")就可以获取IP地址了

----我怎能在别人的苦难面前转过脸去----
2012-12-28 11:14
Tremble
Rank: 1
等 级:新手上路
帖 子:6
专家分:2
注 册:2012-10-19
收藏
得分:3 
新手帮顶
2012-12-28 21:40
chunehi
Rank: 1
等 级:新手上路
帖 子:1
专家分:2
注 册:2012-12-28
收藏
得分:3 
同帮顶
2012-12-29 00:12
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:3 
2楼已经给出了明确答案,3-4楼所谓“帮顶”有灌水之嫌啊。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2012-12-29 14:15
快速回复:ASP新手求教,如何获取客户端IP?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024795 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved