
.版本 2.支持库 dp1
.程序集 窗口程序集1
.子程序 _按钮1_被单击
' 这是加密
写配置项 (取运行目录 () + “\配置.ini”, “数据”, “数据1”, 到文本 (加密数据 (到字节集 (编辑框1.内容), “这里随便填,但是解密的时候要跟这里填的一样”, #RC4算法)))
写配置项 (取运行目录 () + “\配置.ini”, “数据”, “数据2”, 到文本 (加密数据 (到字节集 (编辑框2.内容), “这里随便填,但是解密的时候要跟这里填的一样”, #RC4算法)))
.子程序 _按钮2_被单击
' 这是解密
编辑框1.内容 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\配置.ini”, “数据”, “数据1”, )), “这里随便填,但是解密的时候要跟这里填的一样”, #RC4算法))
编辑框2.内容 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\配置.ini”, “数据”, “数据2”, )), “这里随便填,但是解密的时候要跟这里填的一样”, #RC4算法))
.版本 2
.支持库 dp1
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 k, 文本型
.局部变量 计数, 整数型
.判断循环首 (标签1.标题 ≠ “123”)
k = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\1.ini”, “123”, “12345”, )), “kl”, #RC4算法))
计数 = 到整数 (k)
延迟 (30)
标签1.标题 = 到文本 (计数)
写配置项 (取运行目录 () + “\1.ini”, “123”, “12345”, 到文本 (加密数据 (到字节集 (到文本 (计数 + 1)), “kl”, #RC4算法)))
.判断循环尾 ()
你确定你前后密码、参数都一致么,还要注意一点是写配置项与读配置项只针对文本,如果你是数字的话要用 到文本()转换的,你直接写“123456”字符串是不对的,给你写个吧,说起来费劲
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)