API: InternetGetConnectedState
Declare Auto Function InternetGetConnectedState Lib "wininet" (ByVal connectionDescription As Integer, ByVal tmp As Integer) As Boolean
bConnect = InternetGetConnectedState(0, 0)
我现在用手机拨号上网测试是可以正确检查状态的,上班后看看连接到局域网的情况如何?
再试试IsDestinationReachable()
--------
MSDN:
Retrieves the connected state of the local system.
BOOL InternetGetConnectedState(
LPDWORD lpdwFlags,
DWORD dwReserved
);
Parameters
lpdwFlags
[out] Pointer to a variable that receives the connection description. This parameter can be one or more of the following values.
Value | Meaning |
INTERNET_CONNECTION_CONFIGURED | Local system has a valid connection to the Internet, but it might or might not be currently connected. |
INTERNET_CONNECTION_LAN | Local system uses a local area network to connect to the Internet. |
INTERNET_CONNECTION_MODEM | Local system uses a modem to connect to the Internet. |
INTERNET_CONNECTION_MODEM_BUSY | No longer used. |
INTERNET_CONNECTION_OFFLINE | Local system is in offline mode. |
INTERNET_CONNECTION_PROXY | Local system uses a proxy server to connect to the Internet. |
INTERNET_RAS_INSTALLED | Local system has RAS installed. |
dwReserved
[in] Reserved. Must be zero.
Return Values
Returns TRUE if there is an Internet connection, or FALSE otherwise.
//-----------------------------------
#define INTERNET_CONNECTION_MODEM 0x01
#define INTERNET_CONNECTION_LAN 0x02
#define INTERNET_CONNECTION_PROXY 0x04
#define INTERNET_CONNECTION_MODEM_BUSY 0x08 /* no longer used */
#define INTERNET_RAS_INSTALLED 0x10
#define INTERNET_CONNECTION_OFFLINE 0x20
#define INTERNET_CONNECTION_CONFIGURED 0x40
//-----------------------------------