月光搜索-追捕版的原理是什么啊?用的什么语句啊?(100分)

  • 主题发起人 主题发起人 吴三桂
  • 开始时间 开始时间

吴三桂

Unregistered / Unconfirmed
GUEST, unregistred user!
谢谢啊:)
 
各地以及各国家的ISP(163,169,167等)分配的IP地址段不相同
比如我国的163使用202.x.x.x的IP,169使用61.x.x.x的IP,用
个小数据库把这些IP段与地区名对应起来,使用时通过IP查
 
不是这个意思:)我们的IP还是218.58.2.xxx呢:)

我是说这个程序用的是什么语句?

http://go5.163.com/wholove/download/fn.exe

 
"什么语句" ????????????????????
 
不是,我说的不清楚,对不起啊:)

就是说怎么样这么快的把这些计算机的名、工作组查出来?

用的什么方法?
 
用了N种协议!
 
呵呵[:D]
哪个不就是用了wry.dll这个追捕的东西
告诉你你把他的后缀改成dbf看看。就是一个DBF数据库。把IP到里面去搜索得到
所在的地区,其他的看下面

计算机名:
uses winsock;
function IPAddrToName(IPAddr : String): String;
var
SockAddrIn: TSockAddrIn;
HostEnt: PHostEnt;
WSAData: TWSAData;
begin
WSAStartup($101,WSAData);
SockAddrIn.sin_addr.s_addr:= inet_addr(PChar(IPAddr));
HostEnt:= gethostbyaddr(@SockAddrIn.sin_addr.S_addr,4,AF_INET);
if HostEnt<>nil then
begin
result:=StrPas(Hostent^.h_name)
end
else
begin
result:='';
end;

end;

 
QUICKSILVER 说的对就是NETBIOS
 
to QuickSilver:

能简单说明一下吗:)
 
我觉得fn相当于nbtstat,是向对方137端口发UDP包,对方会返回一个包,内有
计算机名、工作组等信息。我用VC作过一个类似的。
 
你是想让大家开过“杀龟大会”??
 
呵呵,可以啊:)大家帮了我,我就当大乌龟好了:)重要是大家开心:)

但前题是先解决问题,要不岂不是“死不瞑目”吗:)呵呵:)
 
请看这个贴子,zw84611大虾已给出代码,想要的弟兄进入看吧
http://www.delphibbs.com/delphibbs/dispq.asp?lid=596039
 
可去这儿下,功能和fn.exe一模一样。
http://delphi.mychangshu.com/dispdoc.asp?id=367
 
呵呵,问问老冯不就知道了吗!:)
原来有原码,找了半天没找到,我在找找!
 
后退
顶部