易语言文本_解密c,易语言动态加解密例子源码
.版本?2
.支持庫?dp1
.支持庫?spec
.程序集?窗口程序集_啟動窗口
.子程序?__啟動窗口_創建完畢
.子程序?動態_加密,?文本型,?公開
.參數?原文本,?文本型
.參數?加密秘鑰,?文本型
.參數?擾亂文本,?文本型
.局部變量?局_字節集,?字節集
.局部變量?a,?文本型
局_字節集?=?到字節集?(原文本)
局_字節集?=?加密數據?(局_字節集,?加密秘鑰,?#DES算法)
局_字節集?=?局_字節集?+?編碼_BASE64解碼?(擾亂文本)
原文本?=?編碼_BASE64編碼?(局_字節集)
返回?(原文本)
.子程序?動態_解密,?文本型
.參數?原文本,?文本型
.參數?解密秘鑰,?文本型
.參數?擾亂文本字節集長度,?整數型
.局部變量?局_字節集,?字節集
局_字節集?=?編碼_BASE64解碼?(原文本)
局_字節集?=?子字節集替換?(局_字節集,?取字節集右邊?(局_字節集,?擾亂文本字節集長度),?,?,?)
局_字節集?=?解密數據?(局_字節集,?解密秘鑰,?#DES算法)
原文本?=?到文本?(局_字節集)
返回?(原文本)
.子程序?_按鈕1_被單擊
.局部變量?擾亂文本,?文本型
置隨機數種子?()
擾亂文本?=?到文本?(取隨機數?(11111,?99999))?+?“,”?+?到文本?(取隨機數?(11111,?99999))?+?“,”?+?到文本?(取隨機數?(11111,?99999))?+?“,”?+?到文本?(取隨機數?(11111,?99999))
調試輸出?(取字節集長度?(編碼_BASE64解碼?(擾亂文本)))
編輯框2.內容?=?編輯框2.內容?+?動態_加密?(編輯框1.內容,?“加密文本”,?擾亂文本)?+?#換行符
.子程序?_按鈕2_被單擊
.局部變量?擾亂文本長度,?整數型
編輯框2.內容?=?動態_解密?(編輯框1.內容,?“加密文本”,?18)
@人善帝王心
文件下載
解壓密碼:
Tags:動態加解密
來源:三葉資源網,歡迎分享,公眾號:iisanye,(三葉資源網⑤群:21414575)
總結
以上是生活随笔為你收集整理的易语言文本_解密c,易语言动态加解密例子源码的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 【中间件安全】Apache 安全加固规范
- 下一篇: NLite 更新日志