易语言自动连接无线网络

‘壹’ 用易语言怎么连接宽带

用易语言怎么连接宽带

首先

编辑框1.内容 ＝ 到文本 (读配置项 (取运行目录 () ＋ “网络配置.ini”, “配置”, “账户”, ))

编辑框2.内容 ＝ 到文本 (读配置项 (取运行目录 () ＋ “网络配置.ini”, “配置”, “密码”, ))

其次 .

如果 (是否已在线 () ＝ 真)

标签1.标题 ＝ “已经拨号！”

.否则

标签1.标题 ＝ “还没拨号!”

.如果结束

.如果 (注册项是否存在 (#本地机器, “自动连接ADSL”) ＝ 真)

选择框3.选中 ＝ 真

.否则

选择框3.选中 ＝ 假

再次

如果结束

加载皮肤 (“皮肤模块”)' 读加密账户和加密密码 ()

如果启动窗口.可视 ＝ 真

如果 (编辑框1.内容 ≠ “” 且 编辑框2.内容 ≠ “”)

.如果 (选择框3.选中 ＝ 真)

手动拨号 ()

托盘 ()

_启动窗口.可视 ＝ 假

标签1.文本颜色 ＝ #蓝色

.否则

标签1.标题 ＝ “自动连接失败”

标签1.文本颜色 ＝ #红色

可视 ＝ 真

.如果结束

补充：易语言是一门计算机编程语言。以“易”着称，以中文作为程序代码表达的语言形式。易语言的创始人是吴涛。早期版本的名字为E语言。易语言最早的版本的发布可追溯至2000年9月11日。创造易语言的初衷是进行用中文来编写程序的实践。从2000年至今，易语言已经发展到一定的规模，功能上、用户数量上都十分可观。2015年已推出易安卓，用于编译安卓系统手机APP

‘贰’ 用易语言怎么连接宽带

我给你代码看看,但下面的代码需要图片资源和皮肤模块，如果你需要源码把邮箱写上，我给你发过去。
.版本
2
.支持库
internet
.程序集
窗口程序集1
.子程序
__启动窗口_创建完毕
编辑框1.内容
＝
到文本
(读配置项
(取运行目录
()
＋
“\网络配置.ini”,
“配置”,
“账户”,
))
编辑框2.内容
＝
到文本
(读配置项
(取运行目录
()
＋
“\网络配置.ini”,
“配置”,
“密码”,
))
.如果
(是否已在线
()
＝
真)
标签1.标题
＝
“已经拨号！”
.否则
标签1.标题
＝
“还没拨号!”
.如果结束
.如果
(注册项是否存在
(#本地机器,
“software\microsoft\windows\CurrentVersion\Run\自动连接ADSL”)
＝
真)
选择框3.选中
＝
真
.否则
选择框3.选中
＝
假
.如果结束
加载皮肤
(“皮肤模块”)
'
读加密账户和加密密码
()
读取秒
()
_启动窗口.可视
＝
真
.如果
(编辑框1.内容
≠
“”
且
编辑框2.内容
≠
“”)
.如果
(选择框3.选中
＝
真)
手动拨号
()
托盘
()
_启动窗口.可视
＝
假
.否则
.如果结束
.否则
.如果结束
托盘
()
.子程序
_更改皮肤_被选择
皮肤参数调整
()
.子程序
手动拨号
.如果
(编辑框1.内容
≠
“”
且
编辑框2.内容
≠
“”)
.如果
(拨号
(“@n”,
编辑框1.内容,
编辑框2.内容,
真,
标签1)
＝
真)
时钟1.时钟周期
＝
秒
标签1.标题
＝
“自动连接成功”
标签1.文本颜色
＝
#蓝色
.否则
标签1.标题
＝
“自动连接失败”
标签1.文本颜色
＝
#红色
可视
＝
真
.如果结束
.否则
信息框
(“账户和密码不可以为空”,
0,
)
.如果结束
.子程序
挂断1
时钟1.时钟周期
＝
0
挂断
()
信息框
(“网络挂断成功”,
0,
)
标签1.标题
＝
“挂断”
.子程序
_按钮2_被单击
挂断1
()
托盘
()
.子程序
_时钟2_周期事件
.如果真
(是否已在线
()
＝
假)
手动拨号
()
.如果真结束
.子程序
_选择框1_被单击
.如果
(选择框1.选中
＝
假)
.如果真
(信息框
(“确认取消记住密码”,
1,
)
＝
1)
选择框1.选中
＝
真
.如果真结束
.否则
信息框
(“记住密码已应用”,
0,
)
.如果结束
.子程序
_按钮1_被单击
时钟1.时钟周期
＝
0
.如果
(编辑框1.内容
≠
“”
且
编辑框2.内容
≠
“”)
.如果
(拨号
(“@n”,
编辑框1.内容,
编辑框2.内容,
真,
标签1)
＝
真)
时钟1.时钟周期
＝
秒
标签1.标题
＝
“连接成功”
标签1.文本颜色
＝
#蓝色
可视
＝
假
托盘
()
.否则
标签1.标题
＝
“连接失败”
标签1.文本颜色
＝
#红色
托盘
()
.如果结束
.否则
信息框
(“账户和密码不可以为空”,
#警告图标,
)
.如果结束
.如果真
(选择框1.选中
＝
真)
写配置项
(取运行目录
()
＋
“\网络配置.ini”,
“配置”,
“账户”,
编辑框1.内容)
写配置项
(取运行目录
()
＋
“\网络配置.ini”,
“配置”,
“密码”,
编辑框2.内容)
.如果真结束
.子程序
_选择框3_被单击
.如果
(选择框3.选中
＝
真)
写注册项
(#本地机器,
“software\microsoft\windows\CurrentVersion\Run\自动连接ADSL”,
取运行目录
()
＋
“\”
＋
取执行文件名
())
信息框
(“设置开机自动连接成功”,
0,
)
.否则
删除注册项
(#本地机器,
“software\microsoft\windows\CurrentVersion\Run\自动连接ADSL”)
信息框
(“设置开机不自动连接成功”,
0,
)
.如果结束
.子程序
_时钟1_周期事件
.如果
(选择框2.选中
＝
真)
.如果真
(是否已在线
()
＝
假)
手动拨号
()
托盘
()
.如果真结束
.否则
.如果结束
.子程序
_断线重连频率_被选择
载入
(窗口1,
,
真)
.子程序
读取秒
秒
＝
到数值
(读配置项
(取运行目录
()
＋
“\网络配置.ini”,
“配置”,
“断线重连间隔”,
“5”))
.子程序
__启动窗口_位置被改变
.如果
(_启动窗口.位置
＝
2)
_启动窗口.可视
＝
假
托盘
()
.否则
.如果结束
.子程序
托盘
.如果
(是否已在线
()
＝
真)
置托盘图标
(#图标红,
“宽带连接:(”
＋
标签1.标题
＋
“)”)
.否则
置托盘图标
(#图标绿,
“宽带连接:(”
＋
标签1.标题
＋
“)”)
.如果结束
.子程序
__启动窗口_托盘事件
.参数
操作类型,
整数型
.如果
(操作类型
＝
1)
_启动窗口.可视
＝
真
_启动窗口.位置
＝
1
.否则
.如果结束
.如果
(操作类型
＝
3)
弹出菜单
(功能,
,
)
.否则
.如果结束
.子程序
_选择框2_被单击
.如果
(选择框2.选中
＝
假)
信息框
(“断线重连功能已经关闭”,
0,
)
.否则
信息框
(“断线重连功能开启”,
0,
)
.如果结束
.子程序
_连接_被选择
.如果
(是否已在线
()
＝
假)
_按钮1_被单击
()
.否则
信息框
(“你已经连接网络”,
0,
)
.如果结束
.子程序
_断开_被选择
_按钮2_被单击
()
.子程序
_退出_被选择
_启动窗口.可视
＝
真
_启动窗口.位置
＝
1
.程序集
窗口程序集2
.子程序
_按钮1_被单击
销毁
()
.子程序
_按钮2_被单击
.如果
(到数值
(编辑框1.内容)
＜
5)
信息框
(“不可以设置5秒以下！”
＋
#换行符
＋
“否则会出现无限制连接的错误”,
0,
)
.否则
写配置项
(取运行目录
()
＋
“\网络配置.ini”,
“配置”,
“断线重连间隔”,
到文本
(秒))
销毁
()
.如果结束
.子程序
_编辑框1_内容被改变
秒
＝
到数值
(编辑框1.内容)
秒
＝
秒
×
1000
.
全局变量
秒,
长整数型
.图片
图标绿
.图片
图标红

‘叁’ 有关易语言实现自动断开网络连接与自动连接的问题！！

简单点的直接修改网关就行了.
netsh interface ip set address "本地连接" static 192.168.0.1 255.255.255.0 192.168.0.254 1

运行 (“netsh interface ip set address ” ＋ #引号 ＋ “本地连接” ＋ #引号 ＋ “ static 192.168.0.1 255.255.255.0 192.168.0.254 1”, 假, )

‘肆’ 易语言怎么写wifi连接软件用什么函数

看到这些垃圾回答我就生气！！老是有人不懂装懂，让我来告诉你真正的答案，希望不会太晚。
网络搜“易语言资源网”，再在网内搜“易语言WiFi密码连接源码”你就能找到源码了。

易语言WiFi密码连接源码例程程序结合易语言XML解析支持库，调用API函数和易语言模块连接WiFi，仅限WIN7使用，需要wlanapi.dll的支持。