如何得到本机IP,判断是否在Internet上?(50分)

  • 主题发起人 AI_Player
  • 开始时间
A

AI_Player

Unregistered / Unconfirmed
GUEST, unregistred user!
1.得到的IP要是外网的,不能是内网的.
2.判断是否在Internet上要能动态判断,就是针对拨号和ADSL的
 
1、如果你是2000以上系统,比较简单,有iphelp相关的回调函数可以取得所有联结的IP,
如果是98,可以简单检测注册表。
2、判断是否在Internet上,你可以ping一个网址,如www.microsoft.com就可以了。或者
干脆用一个Socket联它的80端口,如果成功就在网上啦。
 
1.说说具体的方法
2.我一直Ping 吗?
 
还是自己动手吧,这样你学得也就比较快。
 
在win98下可用winipcfg.exe查本机地址,NT下可用ipconfig.exe查。
 
查的网卡的IP呀
 
我是想在程序里解决
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=234733
 
这个方法似乎不是很有效.我的注册表里根本就没这个键.
我用的是ADSL。
 
加一个NMTime控件就行了

然后就是

if NMTime1.LocalIP<>'127.0.0.1' then
下线
else
上线
 
加一个NMTime控件
if NMTime1.LocalIP<>'127.0.0.1' then
下线
e lse
上线
 
测试通过,方法如下:
if InternetCheckConnection('http://www.sohu.com',1,0) then
ShowMessage('ON line')
else
ShowMessage('OFF line');
在uses 中加上wininet。

 
同意楼上
 
多人接受答案了。
 
顶部