自己用的帐号管理软件

易语言 2020-09-01 18:11:35

自己用的帐号管理软件

后续我也会更新一些新的功能进去,不过要等有时间了吧。

从超级列表框获取指定条件,然后对数据库中对应的记录进行删除

根据指定条件对数据库中的记录进行遍历查询,调用子程序“写入超级列表框1、2”实现

.如果 (组合框关键字.内容 = “” 或 编辑框帐号.内容 = “” 或 编辑框密码.内容 = “” = 真)
信息框 (“信息填写不完整,请重新填写!”, 48, “错误”)
.否则
到首记录 ()
.如果真 (查找 (读 (#关键字) = 组合框关键字.内容) = 真 且 查找 (读 (#帐号) = 编辑框帐号.内容) = 真)
.如果真 (信息框 (“该关键字下已有相同帐号的信息,是否将密码更新为现在的记录?”, 36, ) = #是钮)
.如果 (修改 (, 编辑框帐号.内容, 编辑框密码.内容) = 真)
信息框 (“修改成功!”, 0, )
.否则
信息框 (“修改失败!”, 0, )
.如果结束
返回 ()
.如果真结束

.如果真结束
.如果 (加记录 (组合框关键字.内容, 编辑框帐号.内容, 编辑框密码.内容) = 真)
信息框 (“添加记录成功!”, 0, “成功”)
连续赋值 (“”, 组合框关键字.内容, 编辑框帐号.内容, 编辑框密码.内容)
.否则
信息框 (“添加记录失败!”, 0, “失败”)