【文件属性】:
文件名称:易语言网络验证源码,会员验证系统
文件大小:3.52MB
文件格式:E
更新时间:2015-01-26 13:56:07
易语言,网络验证,会员系统
制作收费工具的必须
.版本 2
.子程序 充vip
.局部变量 到期时间, 文本型
.局部变量 卡xx, 文本型
.局部变量 ka1, 文本型, , "0"
.局部变量 ka11, 整数型
.局部变量 月到期, 文本型
.判断开始 (编辑框7.内容 = “”)
信息框 (“帐号不能为空”, 0, )
按钮4.禁止 = 假
.判断 (编辑框8.内容 = “”)
信息框 (“充值卡号不能为空”, 0, )
按钮4.禁止 = 假
.判断 (编辑框9.内容 = “”)
信息框 (“密码不能为空”, 0, )
按钮4.禁止 = 假
.默认
.如果 (飘零判断查询 (“卡类”, “卡号”, “密码='” + 编辑框9.内容 + “'” + “ and ” + “使用者='” + “ ” + “'”, , 编辑框8.内容) = 真)
.如果 (飘零判断查询 (“admin”, “等级”, “ID='” + 编辑框7.内容 + “'”, , “免费”) = 真)
卡xx = 飘零_查询 (“卡类”, “类型,总时间”, “卡号='” + 编辑框8.内容 + “'” + “ and ” + “密码='” + 编辑框9.内容 + “'”, )
ka1 = 分割文本 (卡xx, “々”, )
ka11 = 取数组成员数 (ka1)
.判断开始 (ka11 < 1)
.判断 (ka1 [1] = “终身卡”)
.如果 (飘零修改 (“卡类”, “使用者='” + 编辑框7.内容 + “'” + “,” + “充值时间='” + 充值时间 + “'”, “卡号='” + 编辑框8.内容 + “'” + “ and ” + “密码='” + 编辑框9.内容 + “'”))
.如果 (飘零修改 (“admin”, “等级='vip'”, “ID='” + 编辑框7.内容 + “'”) = 真)
信息框 (“充值成功”, 0, )
按钮4.禁止 = 假
.否则
信息框 (“充值失败”, 0, )
按钮4.禁止 = 假
.如果结束
.否则
信息框 (“充值失败”, 0, )
按钮4.禁止 = 假
.如果结束
.判断 (ka1 [1] = “记次卡” 且 ka11 = 2)
.如果 (飘零修改 (“卡类”, “使用者='” + 编辑框7.内容 + “'” + “,” + “充值时间='” + 充值时间 + “'” + “,” + “到期时间='” + ka1 [2] + “'”, “卡号='” + 编辑框8.内容 + “'” + “ and ” + “密码='” + 编辑框9.内容 + “'”))
.如果 (飘零修改 (“admin”, “等级='vip'”, “ID='” + 编辑框7.内容 + “'”) = 真)
信息框 (“充值成功”, 0, )
按钮4.禁止 = 假
.否则
信息框 (“充值失败”, 0, )
按钮4.禁止 = 假
.如果结束
.否则
信息框 (“充值失败”, 0, )
按钮4.禁止 = 假
.如果结束
.判断 (ka1 [1] = “记日卡” 且 ka11 = 2)
月到期 = 到文本 (增减时间 (到时间 (充值时间), 5, 到整数 (ka1 [2])))
.如果 (飘零修改 (“卡类”, “使用者='” + 编辑框7.内容 + “'” + “,” + “充值时间='” + 充值时间 + “'” + “,” + “到期时间='” + 月到期 + “'”, “卡号='” + 编辑框8.内容 + “'” + “ and ” + “密码='” + 编辑框9.内容 + “'”))
.如果 (飘零修改 (“admin”, “等级='vip'”, “ID='” + 编辑框7.内容 + “'”) = 真)
信息框 (“充值成功”, 0, )
按钮4.禁止 = 假
.否则
信息框 (“充值失败”, 0, )
按钮4.禁止 = 假
.如果结束
.否则
信息框 (“充值失败”, 0, )
按钮4.禁止 = 假
.如果结束
.默认
信息框 (“你的卡类型不存在”, 0, )
按钮4.禁止 = 假
.判断结束
.否则
信息框 (“充值失败,你的卡已经是VIP,无需充vip”, 0, )
按钮4.禁止 = 假
.如果结束
.否则
信息框 (“充值失败,充值卡不存在或密码错误或已经被使用”, 0, )
按钮4.禁止 = 假
.如果结束
网友评论
- 不错的源码嘿嘿
- 功能不错。
- 代码不完整
- 飘零的验证系统,还算可以。
- 飘零的验证系统,还算可以。 呃呃呃
- 需要自己去下载 超级模块。不怎么给李
- 可以,个人觉得挺好的
- 支持下,还可以吧
- 不能使用啊
- 不完整啊 亲
- 飘零的验证系统,还算可以。
- 飘零的验证系统,还算可以。
- 飘零的验证系统,还不错,不完整的
- 飘零的验证系统,还算可以。
- 根本不是网络验证的,是假的,是本地验证,而且还不完整。