请问如何判断有没有上网,用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 我晕了,怎么一个简单的IF 判断也写不成器了? 做MIS中ado的简单问题 多线程数据库 怎样获得鼠标在任何窗口按下或弹起状态??谢谢各位大侠啦!!急呀! 动态调用dll 怎样截取系统时间转换为"单号"? 抉择后的迷茫 谁有Ddephi下用intraweb开发B/S系统的实例啊!最好是都用代码写的.偶可以对着研究研究,谢谢啦! InfoPower3000Std,InfoPower3000Pro,InfoPower3000Trial的序列号! 如何将一个文件以流形式打开????????? 一个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的方法我断外网,不断局域网,它还是显示连通。很奇怪