❶ E语言怎么写最简单的加密解密

.版本 2.程序集 窗口程序集1
.程序集变量 初始文本容器, 文本型
.程序集变量 最后文本容器, 文本型.子程序 _按钮1_被单击按钮1.禁止 = 真
按钮2.禁止 = 假
初始文本容器 = 文本框.内容
加密 ()
文本框.内容 = 最后文本容器.子程序 _按钮2_被单击按钮1.禁止 = 假
按钮2.禁止 = 真
初始文本容器 = 文本框.内容
解密 ()
文本框.内容 = 最后文本容器.子程序 加密
.局部变量 文本容器, 文本型
.局部变量 文本内容, 文本型文本容器 = 到全角 (初始文本容器)
文本内容 = 取文本左边 (文本容器, 1)
最后文本容器 = 取文本右边 (文本容器, 取文本长度 (文本容器) - 1) + 文本内容.子程序 解密
.局部变量 文本容器, 文本型
.局部变量 文本内容, 文本型文本内容 = 取文本右边 (初始文本容器, 1)
文本容器 = 文本内容 + 取文本左边 (初始文本容器, 取文本长度 (初始文本容器) - 1)
最后文本容器 = 到半角 (文本容器)

❷ 在易语言里,加密算法只需要作为参数,求rc4算法易语言源码,不是用加密数据命令,而是

.版本2

.子程序加密为rc4,文本型,公开,用RC4算法对文本进行加密
.参数加密的数据,文本型,,欲加密的文本
.参数加密密钥,文本型,可空,用作加密的密码
.局部变量临时,字节集
.局部变量s,字节型,,"256"
.局部变量k,字节型,,"256"
.局部变量i,整数型
.局部变量j,整数型
.局部变量y,整数型
.局部变量outstr,文本型
.局部变量temp,字节型
.局部变量x,整数型
.局部变量t,整数型
.局部变量aaa,文本型

临时=到字节集(文本)
.计次循环首(256,i)
s[i]=i-1
.计次循环尾()
j=1
.计次循环首(256,i)
.如果真(j>取文本长度(密码))
j=1
.如果真结束
k[i]=取代码(取文本中间(密码,j,1),)
j=j+1
.计次循环尾()
j=0
.计次循环首(256,i)
j=(j+s[i]+k[i])%256+1
temp=s[i]
s[i]=s[j]
s[j]=temp
.计次循环尾()
i=0
j=0
.计次循环首(取字节集长度(临时),x)
i=(i+1)%256+1
j=(j+s[i])%256+1
temp=s[i]
s[i]=s[j]
s[j]=temp
t=(s[i]+s[j]%256)%256+1
y=s[t]
aaa=到十六进制文本(位异或(临时[x],y))
outstr=outstr+选择(取文本长度(aaa)>1,“”,“0”)+aaa+“,”
.计次循环尾()
返回(outstr)

.子程序到十六进制文本,文本型
.参数数值,整数型,,

返回(多项选择(右移(数值,4)+1,“0”,“1”,“2”,“3”,“4”,“5”,“6”,“7”,“8”,“9”,“A”,“B”,“C”,“D”,“E”,“F”)+多项选择(位与(数值,15)+1,“0”,“1”,“2”,“3”,“4”,“5”,“6”,“7”,“8”,“9”,“A”,“B”,“C”,“D”,“E”,“F”))

❸ E语言如何制作账号和密码登陆,登陆后直接进入备加密的窗口 最好给个源码....我的QQ:330533463 谢谢

先要建立一个数据库。
.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

打开 (“用户登录.edb”, , , , , , )

.子程序 _取消_被单击

销毁 ()

.子程序 _确定_被单击
.局部变量 用户存在, 逻辑型
.局部变量 用户信息记录号, 整数型
.局部变量 错误次数, 整数型, 静态

用户存在 = 假
' 新用户注册
.如果真 (用户名.内容 = “”)
信息框 (“用户名不能为空”, 0, )
返回 ()

.如果真结束
.如果真 (密码.内容 = “”)
信息框 (“密码不能为空”, 0, )
返回 ()
.如果真结束

到首记录 ()
.计次循环首 (取记录数 (), )
.如果真 (读 (“用户名”) = 用户名.内容) ' 用户名已经被注册
用户存在 = 真
用户信息记录号 = 取记录号 ()
跳出循环 ()
.如果真结束
跳过 ()
.计次循环尾 ()

.如果 (用户名.内容 = 读 (“用户名”))
.如果 (密码.内容 = 读 (“密码”))

载入 (窗口1, , 真)
_启动窗口.销毁 ()

.否则
信息框 (“密码不正确”, #错误图标, )

.如果结束

.否则
信息框 (“用户名不正确”, #错误图标, )
.如果结束

.子程序 _用户名_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 = #回车键)
密码.获取焦点 ()

.如果真结束

.子程序 _密码_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 = #回车键)
确定.获取焦点 ()

.如果真结束

.子程序 _确定_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 = #回车键)
_确定_被单击 ()
.如果真结束

❹ 易语言程序要怎么才能加密文件夹下所有指定后缀的文件

按你要求定做的E软件源码

大致是这样 :

根据你指定的盘符或者目录,自动搜索指定后缀文件(目前原代码中为txt),包含子目录,按指定操作进行加解密(已加密的自动跳过不处理),

为防止多次加密或多次解密造成文件损毁,加密时自动在原文件名前加“此文件已经加密☆”字样,解密时自动将此字样去除。列表框自动列出已被处理文件名。

注意,后缀名目前是txt,你可以在__启动窗口_创建完毕事件下自行修改。

编程愉快,不懂续问