请问如何判断有没有上网,用IcmpSendEcho吗? 请问如何判断有没有上网,用IcmpSendEcho吗?想实现这样一个功能,如果没有上网就显示本地的一个页面,如果上网了就显示某个网站的一个页面请高手指点一下,谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 http://www.delphifans.com/infoView/Article_405.html 看這裏。 function InternetConnected: Boolean;const INTERNET_CONNECTION_MODEM = 1; INTERNET_CONNECTION_LAN = 2; INTERNET_CONNECTION_PROXY = 4; INTERNET_CONNECTION_MODEM_BUSY = 8;var dwConnectionTypes : DWORD;begin dwConnectionTypes := INTERNET_CONNECTION_MODEM+ INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY; Result := InternetGetConnectedState(@dwConnectionTypes, 0);end; 我非常想要你这种方法,因为我是连接我自己的网站,如果给关了我就显示本地的。但我用的IcmpSendEcho的方法我断外网,不断局域网,它还是显示连通。很奇怪 suiyunonghen 你这个方法是不错,但是我必须禁用连接才生效,就是说如果有局域网就返回true。哪怕局域网不能上外网还是返回true 第一次发贴.多多包含 d7里如何统计某个工程的代码总量呀?一台电脑上同时装d7和d2007会出问题嘛? 请问TQueue是线程安全的吗???? 如何编程管理serv-u的帐户? "数学公式解析器"控件在我的delphi6上无法安装,请求达人指点 高手请进!!!!(不会的不要进来) 加薪后,是走还是留?高分相赠 有谁做过进销存软件吗?这个问题么样解决?给分么,只要解决了你要多少我给多少!!! 如何改变TTreeView的Hint? 怎么样使程序只运行一个实例? 一个Delphi的问题 如何用quickrep和ADO设置打印?
const
INTERNET_CONNECTION_MODEM = 1;
INTERNET_CONNECTION_LAN = 2;
INTERNET_CONNECTION_PROXY = 4;
INTERNET_CONNECTION_MODEM_BUSY = 8;
var
dwConnectionTypes : DWORD;
begin
dwConnectionTypes := INTERNET_CONNECTION_MODEM+ INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY;
Result := InternetGetConnectedState(@dwConnectionTypes, 0);
end;
我非常想要你这种方法,因为我是连接我自己的网站,如果给关了我就显示本地的。
但我用的IcmpSendEcho的方法我断外网,不断局域网,它还是显示连通。很奇怪