谁给讲一下论坛中显示在线用户IP的机制?

lucky6418 2003-12-22 09:10:02
刚下载了个动网论坛,内网建站,用了动态域名软件,
结果显示在线用户ip的时候全是127.0.0.1.
不知道是论坛设置的原因,还是动态域名软件的原因.

哪位给解释一下论坛中显示ip的原理和在asp中实现取ip的语句,
感激不尽!

还有如qq,在线游戏等,取用户ip的原理是什么?
...全文
96 16 打赏 收藏 转发到动态 举报
写回复
用AI写文章
16 条回复
切换为时间正序
请发表友善的回复…
发表回复
lucky6418 2003-12-24
  • 打赏
  • 举报
回复
是内网建站客户端软件的问题,在他们的站点找到了解释:

问:为什么访问我的站点的用户的IP地址都是127.0.0.1?

答:这是因为您是私有IP地址用户,访问者不能直接访问到您,访问者需要通过我们的中继服务系统间接进行访问,其中真正从您的计算机上获取资源的是运行在您的计算机上的中继客户端,然后再由客户端传递给访问者。因此对于您而言实际上是自己访问自己,所以来访者的IP地址都是您自己(127.0.0.1)。

感谢各位大力相助,来者有分:)
huang59 2003-12-23
  • 打赏
  • 举报
回复
127.0.0.1只能说明你是从本机访问的,你用192.168.0.1,他也会显示192.168.0.1的,你从内网中的其他机器上访问一下,保险不是了
yjgx007 2003-12-23
  • 打赏
  • 举报
回复
楼上几位说得很对
lucky6418 2003-12-23
  • 打赏
  • 举报
回复
hnjava(堕落♂阿飞), 你是内网建站么,怎么配置的?
试一下这个http://command.dhcn.net/test/ip.asp
看是不是显示127.0.0.1,我找好多网友试过了,都是127.0.0.1
ip.asp就是如下代码

<%
dim aa
aa=request.servervariables("HTTP_X_FORWARDED_FOR")
if aa="" then
aa=request.servervariables("REMOTE_ADDR")
end if
response.write aa
%>
lois80 2003-12-23
  • 打赏
  • 举报
回复
学习
taomaintao 2003-12-23
  • 打赏
  • 举报
回复
主要是通过在Global.asa文件下功夫
  • 打赏
  • 举报
回复
不是都是你本机上的访问吧
hnjava 2003-12-23
  • 打赏
  • 举报
回复
<%
dim aa
aa=request.servervariables("HTTP_X_FORWARDED_FOR")
if aa="" then
aa=request.servervariables("REMOTE_ADDR")
end if
response.write aa
%>

这段代码,在我的服务器上可以正确的,取得ip地址!
lucky6418 2003-12-23
  • 打赏
  • 举报
回复
我是内网建站,用上述命令取到的在线用户ip都是127.0.0.1,
这是怎么回事,怎么解决??
救救我,着急啊!!
lucky6418 2003-12-23
  • 打赏
  • 举报
回复
写的一点没错,
可是问题不是出在asp取ip的语句怎么写,
问题在于我是内网建站,那样取ip只能是127.0.0.1

我用上述语句写了一个简单的asp文件,
找网友测试了一下,取出的就是127.0.0.1
文件内容如下:
<%
dim aa
aa=request.servervariables("HTTP_X_FORWARDED_FOR")
if aa="" then
aa=request.servervariables("REMOTE_ADDR")
end if
response.write aa
%>
有兴趣的朋友试一下:http://command.dhcn.net/test/ip.asp
看是不是显示 127.0.0.1

这个到底怎么解决,没人知道么,55555555555555
flying310 2003-12-23
  • 打赏
  • 举报
回复
Dim userip,userip2
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
userip2 = Request.ServerVariables("REMOTE_ADDR")
if userip = "" then
response.write "您的真实IP 是:"&userip2&","
else
response.write "您的真实IP 是:"&userip&","
end if
response.write usersysinfo(Request.ServerVariables("HTTP_USER_AGENT"),2)&","&usersysinfo(Request.ServerVariables("HTTP_USER_AGENT"),1)

函数如下

function usersysinfo(info,getinfo)
if instr(info,";")>0 then
dim usersys
usersys=split(info,";")
if ubound(usersys)>=2 then
usersys(1)=replace(usersys(1),"MSIE","Internet Explorer")
usersys(2)=replace(usersys(2),")","")
usersys(2)=replace(usersys(2),"NT 5.1","XP")
usersys(2)=replace(usersys(2),"NT 5.0","2000")
usersys(2)=replace(usersys(2),"9x","Me")
usersys(1)="浏 览 器:" & Trim(usersys(1))
usersys(2)="操作系统:" & Trim(usersys(2))
if getinfo=1 then
usersysinfo=usersys(1)
else
usersysinfo=usersys(2)
end if
else
if getinfo=1 then
usersysinfo="浏 览 器:未知"
else
usersysinfo="操作系统:未知"
end if
end if
else
if getinfo=1 then
usersysinfo="未知"
else
usersysinfo="未知"
end if
end if
end function
lucky6418 2003-12-23
  • 打赏
  • 举报
回复
再顶
lucky6418 2003-12-23
  • 打赏
  • 举报
回复
问题没解决阿,

哪位能详细的讲讲,

Global.asa文件怎么配置?

着急郁闷中....
ygghost 2003-12-22
  • 打赏
  • 举报
回复
<%
mIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If mIPAddr = "" Then
mIPAddr = Request.ServerVariables("REMOTE_ADDR")
end if
%>
用户来访信息 你的ip地址是<%=mIPAddr %>
online 2003-12-22
  • 打赏
  • 举报
回复
这个你可以研究一下动网的
ying1234 2003-12-22
  • 打赏
  • 举报
回复
aa=request.servervariables("HTTP_X_FORWARDED_FOR")/取通过代理服务器上网的用户
if aa="" then/如果不是通过代理服务器上网的用户,aa为空。
aa=request.servervariables("REMOTE_ADDR")

28,407

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧