易語言加密數據之后無法解密數據的問題


點擊寫配置按鈕,直接把編輯框1的內容讀取出來,然后加密數據,寫到配置項里面,我選擇的是DES加密。

讀配置是讀取配置文件,解密數據,寫內容到編輯框1,但是這時解密失敗了,在網上百度了一下,發現,加密后的數據 (也就是字節集),不能直接到文本,需要先用Base64編碼,否則就會解密失敗。(RC4加密 我測試了下 是不用編碼的)

下面是加密解密成功的代碼:

.版本 2
.支持庫 xplib
.支持庫 dp1

.程序集 窗口程序集_啟動窗口

.子程序 __啟動窗口_創建完畢

XP風格 (#綠色風格)


.子程序 _按鈕1_被單擊
.局部變量 加密后的數據, 文本型

加密后的數據 = 編碼_BASE64編碼 (加密數據 (到字節集 (編輯框1.內容), “123”, 1))
寫配置項 (取運行目錄 () + “\Config.ini”, “我是你爹!”, “NO1”, 加密后的數據)
寫配置項 (取運行目錄 () + “\Config.ini”, “我是你爹!”, “NO2”, 編輯框2.內容)
寫配置項 (取運行目錄 () + “\Config.ini”, “我是你爹!”, “NO3”, 編輯框3.內容)
寫配置項 (取運行目錄 () + “\Config.ini”, “我是你爹!”, “NO4”, 編輯框4.內容)

.子程序 _按鈕2_被單擊
.局部變量 解密后的數據, 文本型

解密后的數據 = 到文本 (解密數據 (編碼_BASE64解碼 (讀配置項 (取運行目錄 () + “\Config.ini”, “我是你爹!”, “NO1”, )), “123”, 1))
編輯框1.內容 = 解密后的數據
編輯框2.內容 = 讀配置項 (取運行目錄 () + “\Config.ini”, “我是你爹!”, “NO2”, )
編輯框3.內容 = 讀配置項 (取運行目錄 () + “\Config.ini”, “我是你爹!”, “NO3”, )
編輯框4.內容 = 讀配置項 (取運行目錄 () + “\Config.ini”, “我是你爹!”, “NO4”, )

 


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM