點擊寫配置按鈕,直接把編輯框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”, )