以编程方式检测丢失的URL连接

Question

我使用ole对象Shell.Explorer.2在我的表单中显示一个网页。我需要能够检测到与服务器/ URL的连接是否丢失。

我想如果服务器出现故障或互联网连接中断，与服务器的连接将会丢失。如果连接丢失，我想关闭我的表单。没有重新连接。

Answer 1

InternetCheckConnection（）

这就是答案。谢谢Berezniker先生

#DEFINE  FLAG_ICC_FORCE_CONNECTION 1
DECLARE LONG InternetCheckConnection IN Wininet.DLL ;
    STRING Url, ;
    LONG dwFlags, ;
    LONG Reserved
 
* Fast and reliable web site
lcUrl = "http://www.google.com"
 
IF InternetCheckConnection(lcUrl, FLAG_ICC_FORCE_CONNECTION, 0) <> 0
    ? "Connection is available"
ELSE
    ? "No Connection"
ENDIF