易如意网络验证1.3示例源码

icaizi

没有精币了，求赏赐
废话不多说直接上图




网站后台服务器示例也架设好了。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

初始化域名 (“https://www.qqiai.com/tool/ruyiyanzheng/”)
编辑框4.内容 ＝ 到文本 (取绝对值 (取硬盘特征字 ()))  ' 取硬盘识别码

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
返回信息	文本型

返回信息 ＝ zc (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容, 编辑框5.内容)
输出调试文本 (返回信息)
如果真 (返回信息 ＝ “成功”)
信息框 (“zc” ＋ 返回信息, 0, “提示”, )
返回 ()

如果真 (返回信息 ≠ “成功”)
信息框 (返回信息, 0, “提示”, )
返回 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
json	类_json
返回信息	文本型
到期时间	文本型
时间	文本型
到期	整数型
返回验证	文本型

返回信息 ＝ 登入 (编辑框6.内容, 编辑框7.内容, 到文本 (取绝对值 (取硬盘特征字 ())))
输出调试文本 (返回信息)
json.解析 (返回信息)
如果 (json.取通用属性 (“token”, ) ≠ “”)
信息框 (“登录成功”, 0, , )
token ＝ json.取通用属性 (“token”, )  ' token  全局变量   后面要用！
用户名 ＝ json.取通用属性 (“user”, )
到期时间 ＝ 时间_时间戳转文本 (json.取通用属性 (“vip”, ))
信息框 (返回信息, 0, , )

时间 ＝ 取服务器时间 ()
到期 ＝ 到整数 (取时间间隔 (到时间 (到期时间), 到时间 (时间), #日 ))
标签8.标题 ＝ “用户名：” ＋ 用户名
标签9.标题 ＝ “到期时间：剩余” ＋ 到文本 (到期) ＋ “天”
标签10.标题 ＝ “是否会员：” ＋ 验证身份 (token)
时钟1.时钟周期 ＝ 60000

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 初始化域名 (“https://www.qqiai.com/tool/ruyiyanzheng/”)<br /> 编辑框4.内容 ＝ 到文本 (取绝对值 (取硬盘特征字 ()))  ' 取硬盘识别码<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 返回信息, 文本型<br /> <br /> 返回信息 ＝ zc (编辑框1.内容, 编辑框2.内容, 编辑框3.内容, 编辑框4.内容, 编辑框5.内容)<br /> 输出调试文本 (返回信息)<br /> .如果真 (返回信息 ＝ “成功”)<br />     信息框 (“zc” ＋ 返回信息, 0, “提示”, )<br />     返回 ()<br /> .如果真结束<br /> <br /> .如果真 (返回信息 ≠ “成功”)<br />     信息框 (返回信息, 0, “提示”, )<br />     返回 ()<br /> .如果真结束<br /> <br /> <br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 json, 类_json<br /> .局部变量 返回信息, 文本型<br /> .局部变量 到期时间, 文本型<br /> .局部变量 时间, 文本型<br /> .局部变量 到期, 整数型<br /> .局部变量 返回验证, 文本型<br /> <br /> 返回信息 ＝ 登入 (编辑框6.内容, 编辑框7.内容, 到文本 (取绝对值 (取硬盘特征字 ())))<br /> 输出调试文本 (返回信息)<br /> json.解析 (返回信息)<br /> .如果 (json.取通用属性 (“token”, ) ≠ “”)<br />     信息框 (“登录成功”, 0, , )<br />     token ＝ json.取通用属性 (“token”, )  ' token  全局变量   后面要用！<br />     用户名 ＝ json.取通用属性 (“user”, )<br />     到期时间 ＝ 时间_时间戳转文本 (json.取通用属性 (“vip”, ))<br /> .否则<br />     信息框 (返回信息, 0, , )<br /> <br /> <br /> .如果结束<br /> <br /> <br /> 时间 ＝ 取服务器时间 ()<br /> 到期 ＝ 到整数 (取时间间隔 (到时间 (到期时间), 到时间 (时间), #日))<br /> <br /> 标签8.标题 ＝ “用户名：” ＋ 用户名<br /> 标签9.标题 ＝ “到期时间：剩余” ＋ 到文本 (到期) ＋ “天”<br /> 标签10.标题 ＝ “是否会员：” ＋ 验证身份 (token)<br /> 时钟1.时钟周期 ＝ 60000

zlj8zlj8

不错哎看看66666

QWQ12

1.7的有吗

南少

我来看看了啊啊

yjkeeqliu1

先拿分再下载

z406460897

666666666666666666666666666666666

3531314783

sadafsafafafafaf

q790198802

如意网络验证示例.rar

a new soul

66666666666666666666666

名字没想好

这个有意思。看看看看

碎觉碎觉咯

支持开源~！感谢分享