易语言 数组成员数
这个循环导致卡号重复,怎么改啊,急..版本2.如果真(现在卡号=“”)现在卡号=“WL00000000”.如果真结束卡号=分割文本(现在卡号,“L”,)_启动窗口.外部数...
这个循环导致卡号重复,怎么改啊,急.
.版本 2
.如果真 (现在卡号 = “”)
现在卡号 = “WL00000000”
.如果真结束
卡号 = 分割文本 (现在卡号, “L”, )
_启动窗口.外部数据库.关闭记录集 (句柄1)
置随机数种子 ()
.计次循环首 (次, i)
冲值卡号 = 到文本 (到数值 (卡号 [2]) + i + 14)
密码 = 到文本 (取随机数 (10, 99)) + 到文本 (取随机数 (100, 999)) + 到文本 (取随机数 (100, 999))
句柄 = “INSERT INTO 冲值表 ([冲值卡号],[冲值密码],[用户名字],[用户密码],[类型],[是否冲值],[使用次数],[是否在线],[临时客户],[登陆数据],[被冲值帐号],[冲值日期]) VALUES ('” + 取卡号 (冲值卡号) + “','” + 密码 + “','” + “” + “','” + “” + “','” + 类型 + “','” + “假” + “','” + “” + “','” + “假” + “','” + “” + “','” + “” + “','” + “” + “','” + “” + “')”
.如果 (_启动窗口.外部数据库.执行 (句柄, ) = 真)
.否则
信息框 (“添加失败”, 64, “提示”)
跳出循环 ()
.如果结束
.计次循环尾 ()
如图 展开
.版本 2
.如果真 (现在卡号 = “”)
现在卡号 = “WL00000000”
.如果真结束
卡号 = 分割文本 (现在卡号, “L”, )
_启动窗口.外部数据库.关闭记录集 (句柄1)
置随机数种子 ()
.计次循环首 (次, i)
冲值卡号 = 到文本 (到数值 (卡号 [2]) + i + 14)
密码 = 到文本 (取随机数 (10, 99)) + 到文本 (取随机数 (100, 999)) + 到文本 (取随机数 (100, 999))
句柄 = “INSERT INTO 冲值表 ([冲值卡号],[冲值密码],[用户名字],[用户密码],[类型],[是否冲值],[使用次数],[是否在线],[临时客户],[登陆数据],[被冲值帐号],[冲值日期]) VALUES ('” + 取卡号 (冲值卡号) + “','” + 密码 + “','” + “” + “','” + “” + “','” + 类型 + “','” + “假” + “','” + “” + “','” + “假” + “','” + “” + “','” + “” + “','” + “” + “','” + “” + “')”
.如果 (_启动窗口.外部数据库.执行 (句柄, ) = 真)
.否则
信息框 (“添加失败”, 64, “提示”)
跳出循环 ()
.如果结束
.计次循环尾 ()
如图 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询