局域网中客户机如何判断主机已经连上了互联网?(100分)

  • 主题发起人 主题发起人 iboy
  • 开始时间 开始时间
I

iboy

Unregistered / Unconfirmed
GUEST, unregistred user!
在局域网中,仅主机安装有调制解调器能上互联网,其它机器通过共享访问互联网,
怎样编程判断主机是否已经连上了互联网?
注意不能使用ping指令或访问某个网址来实现,因为主机如果检测到其它机器有访问
互联网的需求,会自动拨号上网。
 
var
Types : Integer;
begin
Types := INTERNET_CONNECTION_MODEM +
INTERNET_CONNECTION_LAN +
INTERNET_CONNECTION_PROXY;
if InternetGetConnectedState(@types, 0) then
Edit1.Text := 'your pc is Online now'
else
Edit1.Text := 'your pc is offline now';
end;
 
InternetGetConnectedState(@types, 0) then
 
接受答案了.
 
后退
顶部