通用的订单管理系统软件附加密解密文本模块

.如果 (管理数据库记录集.置连接 (管理数据库连接) ＝ 真)
管理数据库记录集.打开 (“客户”, #数据表名)
管理数据库记录集.到首记录 ()
写入 ＝ 假
.判断循环首 (管理数据库记录集.尾记录后 ＝ 假)
管理数据库记录集.读文本 (“客户添加时间”, q1)
管理数据库记录集.读文本 (“客户姓名”, q2)
管理数据库记录集.读文本 (“客户电话”, q3)
q1 ＝ 解密文本 (q1)
q2 ＝ 解密文本 (q2)
q3 ＝ 解密文本 (q3)
.判断开始 (q1 ＝ 订单日期编辑框.内容 且 q2 ＝ 客户姓名编辑框.内容 且 q3 ＝ 客户电话编辑框.内容)
管理数据库记录集.删除 (1)
调试输出 (管理数据库记录集.操作状态, “??”)
写入 ＝ 管理数据库记录集.更新 ()
跳出循环 ()
.默认
管理数据库记录集.到下一条 ()

.判断结束
延迟 (10)
.判断循环尾 ()
管理数据库记录集.关闭 ()
.判断开始 (写入 ＝ 真)
信息框 (“删除成功！！”, #信息图标, )
信息框 (“删除完成即将刷新！！请确认是否添加正确！！”, 64, )
启动线程 (&订单列表刷新, , )
.默认
信息框 (“删除失败！！”, #信息图标, , )
.判断结束

.否则
信息框 (“连接失败！！”, 64, )