易語言配置項加密
㈠ 覓風易語言第十二課加密數據、讀寫配置項請教各位
.版本 2
.支持庫 dp1
.子程序 _按鈕1_被單擊
.局部變數 數據, 文本型
數據 = 到文本 (加密數據 (到位元組集 (編輯框1.內容), 「1234」, 1))
寫配置項 (取運行目錄 () + 「\配置文件名.ini」, 「AA」, 「aa」, 數據)
數據 = 到文本 (加密數據 (到位元組集 (編輯框2.內容), 「1234」, 1))
寫配置項 (取運行目錄 () + 「\配置文件名.ini」, 「BB」, 「bb」, 數據)
.子程序 _按鈕2_被單擊
.局部變數 數據, 文本型
數據 = 到文本 (解密數據 (到位元組集 (讀配置項 (取運行目錄 () + 「\配置文件名.ini」, 「AA」, 「aa」, )), 「1234」, 1))
編輯框1.內容 = 數據
數據 = 到文本 (解密數據 (到位元組集 (讀配置項 (取運行目錄 () + 「\配置文件名.ini」, 「BB」, 「bb」, )), 「1234」, 1))
編輯框2.內容 = 數據
密碼要一致
㈡ 易語言配置文件如何加密
.版本2
.支持庫dp1
.支持庫spec
.程序集窗口程序集1
.程序集變數需要加密的文本,文本型
.程序集變數加密後的文本,文本型
.子程序__啟動窗口_創建完畢
需要加密的文本=「123456」 '例子可以自己改
.子程序_按鈕1_被單擊
加密後的文本=到文本(加密數據(到位元組集(需要加密的文本),「密碼」,#RC4演算法))
調試輸出(加密後的文本)
.子程序_按鈕2_被單擊
調試輸出(到文本(解密數據(到位元組集(加密後的文本),「密碼」,#RC4演算法)))
㈢ 易語言代碼錯誤(加密解密問題)
編輯框1解密後數據 = 到文本 (解密數據 (到位元組集 (讀配置項 (取運行目錄 () + 「\test.ini」, 「配置」, 「配置1」, )), 「123」, 1))
編輯框2解密後數據 = 到文本 (加密數據 (到位元組集 (讀配置項 (取運行目錄 () + 「\test.ini」, 「配置」, 「配置2」, )), 「123」, 1))
編輯框3解密後數據 = 到文本 (加密數據 (到位元組集 (讀配置項 (取運行目錄 () + 「\test.ini」, 「配置」, 「配置3」, )), 「123」, 1))
編輯框4解密後數據 = 到文本 (加密數據 (到位元組集 (讀配置項 (取運行目錄 () + 「\test.ini」, 「配置」, 「配置4」, )), 「123」, 1))
這幾句明顯有錯誤啊,解密過程,你下面三句都是加密。
另外看看解密過程對不對。
㈣ 易語言5.2寫加密配置項 用RC4演算法的,加密純數字後寫到配置文件但讀出來是亂碼,求解
你確定你前後密碼、參數都一致么,還要注意一點是寫配置項與讀配置項只針對文本,如果你是數字的話要用到文本()轉換的,你直接寫「123456」字元串是不對的,給你寫個吧,說起來費勁
㈤ 易語言讀配置項這個怎麼讀的還是加密過的啊
1.
我看到了句很強的代碼,「到文本 (加密數據 (到位元組集 (編輯框1.內容), 「123」, 1))」
2.
虧樓主想得出啊!
3.
樓主肯定不知加密後的文本不再是文本數據,加密後它和「文本型」是不兼容的!!!
4.
加密後只能存放在「位元組集」變數中或寫到文件中或轉到位元組碼文本或...各種或...,是不能直接轉文本或其它類型的,得委婉點...!
5.
還有1樓也說對了一點,注意下編程順序啊,相同的代碼不同的順序得出的結果往往不同,或優化或累贅或...無效!
1.
關於轉位元組碼,雖然不是什麼高級代碼,但這類演算法還得自己想啊!!!
2.
配置數據不要太長,否則我也不知會怎樣、
3.
下面是源碼,求採納、求加分、求贊同、求評論、求追問...,各種求...
.版本 2
.支持庫 dp1
.子程序 _按鈕1_被單擊
.局部變數 a, 位元組集
.局部變數 n, 整數型
.局部變數 加密後數據, 文本型
.局部變數 s, 整數型
a = 加密數據 (到位元組集 (編輯框1.內容), 「沒密碼,你信嗎?」, #rc4演算法)
s = 取位元組集長度 (a)
.計次循環首 (s, n)
加密後數據 = 加密後數據 + 到文本 (a [n])
.如果真 (n ≠ s)
加密後數據 = 加密後數據 + 「,」
.如果真結束
.計次循環尾 ()
寫配置項 (取運行目錄 () + 「\配置.ini」, 「config」, 「配置1」, 加密後數據)
.子程序 _按鈕2_被單擊
.局部變數 加密後dfgds, 文本型
.局部變數 後數據dfhfh, 文本型, , "0"
.局部變數 a, 位元組集
.局部變數 s, 整數型
.局部變數 n, 整數型
加密後dfgds = 讀配置項 (取運行目錄 () + 「\配置.ini」, 「config」, 「配置1」, )
後數據dfhfh = 分割文本 (加密後dfgds, 「,」, )
s = 取數組成員數 (後數據dfhfh)
a = 取空白位元組集 (s)
.計次循環首 (s, n)
a [n] = 到位元組 (後數據dfhfh [n])
.計次循環尾 ()
加密後dfgds = 到文本 (解密數據 (a, 「沒密碼,你信嗎?」, #rc4演算法))
編輯框1.內容 = 加密後dfgds