易语言如何调用API判断电脑是否联网

1、相关API函数：

InternetGetConnectedStateEx：获取指定的互联网连接的连接状态。

2、DLL命令表：

.版本 2

.DLL命令 InternetGetConnectedStateEx, 逻辑型, "wininet.dll", "InternetGetConnectedStateExA"

    .参数 lpdwFlags, 整数型, 传址

    .参数 lpszConnectionName, 文本型

    .参数 dwNameLen, 整数型

    .参数 dwReserved, 整数型

3、InternetGetConnectedStateEx参数介绍：

lpdwFlags：指向一个无符号长整型变量，描述应该返回的连接；

lpszConnectionName：指向一个字符串值，接收连接的名字；

dwNameLen：lpszConnectionName字符串的长度；

dwReserved：保留，必须设为零。

其中，参数lpdwFlags可取以下值：

INTERNET_CONNECTION_CONFIGURED：本地系统存在一个有效连接到互联网，但可能不是当前连接；

INTERNET_CONNECTION_LAN：本地系统使用局域网连接到互联网；

INTERNET_CONNECTION_MODEM：本地系统使用调制解调器连接到互联网；

INTERNET_CONNECTION_MODEM_BUSY：不再使用；

INTERNET_CONNECTION_OFFLINE：本地系统离线模式；

INTERNET_CONNECTION_PROXY：本地系统使用代理服务器连接到互联网。

INTERNET_RAS_INSTALLED：本地系统已安装RAS。

易语言中，上述常量的10进制数值为：

#INTERNET_CONNECTION_CONFIGURED=64；

#INTERNET_CONNECTION_LAN=2；

#INTERNET_CONNECTION_MODEM=1；

#INTERNET_CONNECTION_MODEM_BUSY=8；

#INTERNET_CONNECTION_OFFLINE=32；

#INTERNET_CONNECTION_PROXY=4；

#INTERNET_RAS_INSTALLED=16。

4、方式一：仅判断电脑是否连接到Internet。

源码：InternetGetConnectedStateExA (0, “宽带连接”, 0, 0)

已连接返回真，否则返回假。

5、方式二：判断电脑是否连接到Internet，并返回连接方式和连接名。源码如下：

.版本 2

.子程序 _按钮_检测_被单击

.局部变量 flag, 整数型

.局部变量 name, 文本型

.局部变量 state, 逻辑型

name ＝ 取空白文本 (20)

state ＝ InternetGetConnectedStateEx (flag, name, 20, 0)

信息框 (“连接状态：” ＋ 到文本 (state) ＋ #换行符 ＋ “连接方式：” ＋ 到文本 (flag) ＋ #换行符 ＋ “连接名：” ＋ name, 0, )

效果如下图：

1.连接状态为真：表示已连接到Internet；

2.连接方式为18：位或 (2, 16)=18，表示本地系统使用局域网连接到互联网且本地系统已安装RAS。