注册 登录
编程论坛 ASP技术论坛

ASP新手求教,如何获取客户端IP?

asp_user 发布于 2012-12-28 10:50, 529 次点击
我在网上找了两段代码

  一个是:
  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?谢谢!!!
4 回复
#2
dzt00012012-12-28 11:14
直接用Response.Write Request.ServerVariables("REMOTE_ADDR")就可以获取IP地址了
#3
Tremble2012-12-28 21:40
新手帮顶
#4
chunehi2012-12-29 00:12
同帮顶
#5
hu9jj2012-12-29 14:15
2楼已经给出了明确答案,3-4楼所谓“帮顶”有灌水之嫌啊。
1