网络验证 www.kekeyz.cn
源码下载地址：易语言网络验证登录界面UI界面.e-其它文档类资源-CSDN下载易语言网络验证登录界面UI界面.e更多下载资源、学习资料请访问CSDN下载频道.https://download.csdn.net/download/u010815991/84594475
.版本 2 .支持库 ExuiKrnln .程序集 窗口程序集_登录界面 .子程序 _登录界面_创建完毕 .如果真 (取反 (是否为调试版 ())) ' 置入代码 (#VM开始) ' 启动线程 (&检测OD, , ) 登录初始化 () ' 置入代码 (#VM结束) .如果真结束 .子程序 登录初始化 .如果 (读配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “remenber”, ) ＝ “1”) 选择框_记住密码.选中 ＝ 真 .否则 选择框_记住密码.选中 ＝ 假 .如果结束 编辑框_登录账号.内容 ＝ 读配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “account”, ) 编辑框_登录密码.内容 ＝ 读配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “password”, ) 编辑框_充值账号.内容 ＝ 读配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “account”, ) 编辑框_修改账号.内容 ＝ 读配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “account”, ) 编辑框_解绑账号.内容 ＝ 读配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “account”, ) 编辑框_解绑密码.内容 ＝ 读配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “password”, ) .子程序 _超级按钮_关闭_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 结束 () .子程序 _超级按钮_登录_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 选择夹EX1.现行子夹 ＝ 0 .子程序 _超级按钮_注册_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 选择夹EX1.现行子夹 ＝ 1 .子程序 _超级按钮_改密_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 选择夹EX1.现行子夹 ＝ 2 .子程序 _超级按钮_充值_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 选择夹EX1.现行子夹 ＝ 3 .子程序 _超级按钮_解绑_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 选择夹EX1.现行子夹 ＝ 4 .子程序 _编辑框_登录账号_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_登录密码.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_登录密码_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_登录账号.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_注册账号_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_注册密码.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_注册密码_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_超级密码.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_超级密码_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_注册账号.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_修改账号_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_修改超级密码.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_修改超级密码_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_修改密码.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_修改密码_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_修改账号.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_充值账号_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_充值卡号.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_充值卡号_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_充值账号.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_解绑账号_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_解绑密码.取窗口句柄 ())) .如果真结束 .子程序 _编辑框_解绑密码_键盘事件, 整数型 .参数 事件类型, 整数型 .参数 事件窗口, 整数型 .参数 键代码, 整数型 .参数 键状态, 整数型 .如果真 (键代码 ＝ 9) 组件置焦点组件 (组件取窗口绑定组件 (编辑框_解绑账号.取窗口句柄 ())) .如果真结束 .子程序 _按钮_登录_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 .局部变量 账号, 文本型 .局部变量 密码, 文本型 .局部变量 验证结果, 文本型 账号 ＝ 编辑框_登录账号.内容 密码 ＝ 编辑框_登录密码.内容 .判断开始 (账号 ＝ “” 或 密码 ＝ “”) 信息框 (“请输入完整的信息”, 0, “提示”, 取窗口句柄 ()) .判断 (1 ＝ 1) .如果真 (选择框_记住密码.选中) 写配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “account”, 账号) 写配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “password”, 密码) 写配置项 (取运行目录 () ＋ “\config.conf”, “Config”, “remenber”, “1”) .如果真结束 登录界面.可视 ＝ 假 ' 载入 (主界面, , 假) 登录界面.销毁 () .默认 信息框 (验证结果, 0, “提示”, 取窗口句柄 ()) .判断结束 .子程序 _按钮_注册_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 .局部变量 账号, 文本型 .局部变量 密码, 文本型 .局部变量 超级密码, 文本型 账号 ＝ 编辑框_注册账号.内容 密码 ＝ 编辑框_注册密码.内容 超级密码 ＝ 编辑框_超级密码.内容 .如果真 (账号 ＝ “” 或 密码 ＝ “”) 信息框 (“请输入完整的信息”, 0, “提示”, 取窗口句柄 ()) 返回 () .如果真结束 .子程序 _按钮_修改密码_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 .局部变量 账号, 文本型 .局部变量 密码, 文本型 .局部变量 超级密码, 文本型 账号 ＝ 编辑框_修改账号.内容 密码 ＝ 编辑框_修改密码.内容 超级密码 ＝ 编辑框_修改超级密码.内容 .如果真 (账号 ＝ “” 或 密码 ＝ “” 或 超级密码 ＝ “”) 信息框 (“请输入完整的信息”, 0, “提示”, 取窗口句柄 ()) 返回 () .如果真结束 .子程序 _按钮_充值_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 .局部变量 账号, 文本型 .局部变量 卡号, 文本型 账号 ＝ 编辑框_充值账号.内容 卡号 ＝ 编辑框_充值卡号.内容 .如果真 (账号 ＝ “” 或 卡号 ＝ “”) 信息框 (“请输入完整的信息”, 0, “提示”, 取窗口句柄 ()) 返回 () .如果真结束 .子程序 _按钮_解绑_鼠标左键单击, 整数型 .参数 坐标x, 整数型 .参数 坐标y, 整数型 .参数 保留参数1, 整数型 .参数 保留参数2, 整数型 .局部变量 账号, 文本型 .局部变量 密码, 文本型 账号 ＝ 编辑框_解绑账号.内容 密码 ＝ 编辑框_解绑密码.内容 .如果真 (账号 ＝ “” 或 密码 ＝ “”) 信息框 (“请输入完整的信息”, 0, “提示”, 取窗口句柄 ()) 返回 () .如果真结束 原文链接：https://blog.csdn.net/u010815991/article/details/123452390?ops_request_misc=%257B%2522request%255Fid%2522%253A%2522167042854316782388022318%2522%252C%2522scm%2522%253A%252220140713.130102334.pc%255Fblog.%2522%257D&request_id=167042854316782388022318&biz_id=0&utm_medium=distribute.pc_search_result.none-task-blog-2~blog~first_rank_ecpm_v1~times_rank-28-123452390-null-null.nonecase&utm_term=%E6%98%93%E8%AF%AD%E8%A8%80%E6%BA%90%E7%A0%81
