发布网友 发布时间:2022-10-18 19:25
共1个回答
热心网友 时间:2023-11-24 19:15
.版本 2
.DLL命令 InternetGetConnectedStateEx, 逻辑型, "wininet.dll", "InternetGetConnectedStateExA"
.参数 lpdwFlags, 整数型, 传址
.参数 lpszConnectionName, 文本型
.参数 dwNameLen, 整数型
.参数 dwReserved, 整数型
--------------------------------
.版本 2
.子程序 _按钮1_被单击
.局部变量 flag, 整数型
.局部变量 name, 文本型
.局部变量 state, 逻辑型
name = 取空白文本 (20)
state = InternetGetConnectedStateEx (flag, name, 20, 0)
信息框 (“连接状态:” + 到文本 (state) + #换行符 + “连接方式:” + 到文本 (flag) + #换行符 + “连接名:” + name, 0, , )
----------------------------------------
复制粘贴进易语言 里面。自己测试结果