如何实现在局域网里实现ping 的功能(10分)

  • 主题发起人 主题发起人 青云
  • 开始时间 开始时间

青云

Unregistered / Unconfirmed
GUEST, unregistred user!
我看到不少网络工具可以把网段内的机器全部扫描 出来,显示机器名,ip,以及其工作组。
比如只要我设置(192.168.0.1~192.168.0.255),它就能实现这个功能,
我看到windows优化大师好象有这个功能。
-------
我想问一下,用delphi如何实现这样的功能。
 
可以调用系统的一个动态连接库, 有个函数叫IcmpSendEcho, 就可以发出icmp包.
目的地址可以自己填入.
还可以用原始套接字, 自己做ip包发出.

至于取得机器名, 可以用netbios来取得
 
我也正在做一个局域网聊天工具
gz!!
 
源码:
http://service.lonetear.com/delphi/dispdoc.asp?id=893
http://service.lonetear.com/delphi/dispdoc.asp?id=377
 
后退
顶部