.版本 2.支持库 dp1
.程序集 窗口程序集1
.子程序 _按钮1_被单击
' 这是加密
写配置项 (取运行目录 () + “\配置.ini”, “数据”, “数据1”, 到文本 (加密数据 (到字节集 (编辑框1.内容), “这里随便填,但是解密的时候要跟这里填的一样”, #RC4算法)))
写配置项 (取运行目录 () + “\配置.ini”, “数据”, “数据2”, 到文本 (加密数据 (到字节集 (编辑框2.内容), “这里随便填,但是解密的时候要跟这里填的一样”, #RC4算法)))
.子程序 _按钮2_被单击
' 这是解密
编辑框1.内容 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\配置.ini”, “数据”, “数据1”, )), “这里随便填,但是解密的时候要跟这里填的一样”, #RC4算法))
编辑框2.内容 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\配置.ini”, “数据”, “数据2”, )), “这里随便填,但是解密的时候要跟这里填的一样”, #RC4算法))先下载精易模块。
然后再在“_启动窗口_创建完毕”里加上这几句命令:
.版本
2
文件_关联
(,
“要关联的后缀名”,
,
“文件”,
)
取命令行
(启动命令行)
.如果真
(取数组成员数
(启动命令行)
≠
0)
(这个地方加上你要处理的命令,我写个例子。)
写到文件(取运行目录()+“\解密后文件.exe”,解密数据(读入文件(启动命令行[1]),“加密密码”))
运行
(取运行目录
()
+
“\解密后文件.exe”,
假,
)
.如果真结束
结束
()
按你要求定做的E软件源码大致是这样
:
根据你指定的盘符或者目录,自动搜索指定后缀文件(目前原代码中为txt),包含子目录,按指定 *** 作进行加解密(已加密的自动跳过不处理),
为防止多次加密或多次解密造成文件损毁,加密时自动在原文件名前加“此文件已经加密☆”字样,解密时自动将此字样去除。列表框自动列出已被处理文件名。
注意,后缀名目前是txt,你可以在__启动窗口_创建完毕事件下自行修改。
祝编程愉快,不懂续问
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)