md5数据库管理模块

易语言 2020-08-06 11:29:38

md5数据库管理模块

易语言md5数据库模块源码中的加密是不可逆的。

.如果真 (是否为空 (参数_文件密码))
参数_文件密码 = “”
.如果真结束
.如果真 (寻找文本 (参数_配置文件名, “\”, , 假) = -1)
参数_配置文件名 = 取特定目录 (9) + “\” + 参数_配置文件名
.如果真结束
参数_配置文件名 = 子文本替换 (参数_配置文件名, “\\”, “\”, , , 真)
局部_文件号 = 打开加密文件 (参数_配置文件名, #改读, , 参数_文件密码, )
.如果真 (局部_文件号 = 0)
返回 (假)
.如果真结束
局部_节存在 = 假
局部_项存在 = 假
.判断循环首 (是否在文件尾 (局部_文件号, 真) = 假) ' 循环读取文本行,判断是否存在指定小节,如果存在,则删除小节所在一行文本。
局部_上次位置 = 取读写位置 (局部_文件号)
局部_读取内容 = 读入一行 (局部_文件号)
.如果真 (到大写 (局部_读取内容) = 到大写 (“[” + 参数_配置节名 + “]”))
局部_节存在 = 真
跳出循环 ()
.如果真结束
' 本源码来自易语言资源网(www.5A5X.com)
.判断循环尾 ()
.如果真 (局部_节存在 = 假) ' 如果不存在指定小节,则删除失败。
关闭文件 (局部_文件号)
返回 (局部_节存在)
.如果真结束
.判断循环首 (是否在文件尾 (局部_文件号, 真) = 假) ' 删除指定小节(已经在上述代码中被删除)下的所有文本行,直到读取到下一小节。
局部_上次位置 = 取读写位置 (局部_文件号)
局部_读取内容 = 读入一行 (局部_文件号)
局部_读取项内容 = 分割文本 (局部_读取内容, “=”, 1)
.判断开始 (参数_配置节项名 = 局部_读取项内容 [1])
局部_项存在 = 真
移动读写位置 (局部_文件号, , 局部_上次位置)
删除数据 (局部_文件号, 取文本长度 (局部_读取内容) + 2)
移动读写位置 (局部_文件号, , 局部_上次位置)
跳出循环 ()
.默认
.如果真 (取文本左边 (删首尾空 (局部_读取内容), 1) = “[” 且 取文本右边 (删首尾空 (局部_读取内容), 1) = “]”)
返回 (局部_项存在)
.如果真结束

.判断结束

.判断循环尾 ()