文本加密解密软件使用例子

易语言 2020-08-08 16:38:48

文本加密解密软件使用例子

.计次循环首 (2, ) ' 我也不知道为啥,,第一次可以了但是有一些字仍然过滤不掉,所以我弄了第二次。。
到首记录 ()
.计次循环首 (取记录数 (), 进度)
.循环判断首 ()
要解密的文本 = 子文本替换 (要解密的文本, 读 (2), 读 (1), 寻找文本 (要解密的文本, 读 (2), , 假), 1, 真)
.循环判断尾 (取反 (寻找文本 (要解密的文本, 读 (2), , 假) = -1))
跳过 ()
.计次循环尾 ()
.计次循环尾 ()

.计次循环首 (取数组成员数 (分割), 计次)
.循环判断首 ()
到首记录 ()
添加的文本 = 取密匙文本 ()
.循环判断尾 (查找 (读 (“密匙”) = 添加的文本)) ' 虽然不怎么担心会发生重复密匙 但是还是以防万一加进来吧
加记录 (分割 [计次], 添加的文本)
进度 = 计次
.计次循环尾 ()