网络验证UI对接易如意1.64附易如意验证模块

易语言 2020-03-28 15:42:10

网络验证UI对接易如意1.64附易如意验证模块

信息框 (局_返回信息, 选择 (网络验证.卡密充值 (User.Token, 编辑框_充值卡密.内容, 局_返回信息), #信息图标, #错误图标), “充值结果”, )
网络验证.刷新用户信息 (User.Token, User)
编辑框_到期时间.内容 = 选择 (User.VIP = “0”, “会员以到期”, 时间_时间戳转文本 (User.VIP))
.如果 (网络验证.会员验证 (User.Token))
载入 (窗口_主程序, , 假)
销毁 ()
.否则
选择夹1.现行子夹 = 3