无名下载

聚合IT技术文章
开源代码资料下载站

数据库加密和解密的

大小:4.275KB更新时间:2020-08-15

部分简介

写到文件 (取运行目录 () + “\” + 编辑框3.内容 + “.txt”, 到字节集 (编辑框2.内容))
打开 (取运行目录 () + “\加密数据库.edb”, , , , , , )
.如果 (取文本长度 (编辑框2.内容) ≤ 512)
加记录 (编辑框4.内容, 取文本左边 (编辑框2.内容, 512))
.否则

.如果结束
.判断循环首 (取反 (尾记录后 ()))
列表框1.加入项目 (读 (#验证号), )
跳过 (1)
.判断循环尾 ()

.计次循环首 (_启动窗口.列表框1.取项目数 (), )
.如果 (编辑框1.内容 = _启动窗口.列表框1.取项目文本 (_启动窗口.列表框1.现行选中项))
_启动窗口._列表框1_列表项被选择 ()
_启动窗口.编辑框5.内容 = _启动窗口.编辑框6.内容 + _启动窗口.编辑框7.内容 + _启动窗口.编辑框8.内容
跳出循环 ()
.否则
_启动窗口.列表框1.现行选中项 = _启动窗口.列表框1.现行选中项 + 1
.如果结束

.计次循环尾 ()

猜你喜欢

官方微信二维码 无名官方微信公众号