怎样让别人在浏览自己的网页,看到他自己的IP操作系统等

来源:百度知道 编辑:UC知道 时间:2024/09/28 12:18:25
当别人进到本人的网页时,可以让看到他自己的IP,来自哪里,操作系统等信息!
怎样做!请详细讲解,谢谢!
QQ空间放到哪个程序里呢,谢谢啊!
可是我看到别人的QQ空间有呢
这个人的个性签名,就是啊
您看看http://user.qzone.qq.com/740833880

http://ip.ipwind.cn/
这个网站可以申请代码

Function GetCurrOS()
Dim Info
Info = navigator.appVersion
If Instr(info,"NT 5.1")>0 Then
GetCurrOS = "Windows XP"
ElseIf Instr(info,"Tel")>0 Then
GetCurrOS = "Telport"
ElseIf Instr(info,"webzip")>0 Then
GetCurrOS = "webzip"
ElseIf Instr(info,"flashget")>0 Then
GetCurrOS = "flashget"
ElseIf Instr(info,"offline")>0 Then
GetCurrOS = "offline"
ElseIf Instr(info,"NT 5")>0 Then
GetCurrOS = "Windows 2000"
ElseIf Instr(info,"NT 4")>0 Then
GetCurrOS = "Windows NT4"
ElseIf Instr(info,"98")>0 Then
GetCurrOS = "Windows 98"
ElseIf Instr(info,"95")>0 Then<