.版本 2.子程序 _按鈕1_被單擊
.局部變數 密碼密碼 = 「隨便填」
.如果 (編輯框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」))
⑶ 易語言 Base64的加密演算法
代碼-----------.版本 2.子程序 Base64編碼, 位元組集, 公開
.參數 原文, 位元組集
.局部變數 余數, 整數型
.局部變數 三位元組數據, 位元組型, , "3"
.局部變數 碼表, 位元組集
.局部變數 len_x, 整數型
.局部變數 len_y, 整數型
.局部變數 結果, 位元組集
.局部變數 i, 整數型
.局部變數 k, 整數型len_x ＝ 取位元組集長度 (原文)
.如果真 (len_x ＜ 1)
返回 ({ })
.如果真結束
余數 ＝ len_x ％ 3
.如果真 (余數 ＞ 0)
原文 ＝ 原文 ＋ 取空白位元組集 (3 － 余數)
len_x ＝ len_x ＋ 3 － 余數
.如果真結束
len_y ＝ len_x × 4 ÷ 3
結果 ＝ 取空白位元組集 (len_y)
i ＝ 1
碼表 ＝ { 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 43, 47 }
.變數循環首 (1, len_x, 3, k)
三位元組數據 [1] ＝ 原文 [k]
三位元組數據 [2] ＝ 原文 [k ＋ 1]
三位元組數據 [3] ＝ 原文 [k ＋ 2]
結果 [i] ＝ 碼表 [右移 (三位元組數據 [1], 2) ＋ 1]
結果 [i ＋ 1] ＝ 碼表 [左移 (位與 (三位元組數據 [1], 3), 4) ＋ 右移 (三位元組數據 [2], 4) ＋ 1]
結果 [i ＋ 2] ＝ 碼表 [左移 (位與 (三位元組數據 [2], 15), 2) ＋ 右移 (三位元組數據 [3], 6) ＋ 1]
結果 [i ＋ 3] ＝ 碼表 [位與 (三位元組數據 [3], 63) ＋ 1]
i ＝ i ＋ 4
.變數循環尾 ()
.判斷開始 (余數 ＝ 2)
結果 [len_y] ＝ 61
.判斷 (余數 ＝ 1)
結果 [len_y] ＝ 61
結果 [len_y － 1] ＝ 61
.默認.判斷結束
返回 (結果).子程序 _按鈕1_被單擊編輯框1.加入文本 (到文本 (Base64編碼 (到位元組集 (編輯框1.內容))))
希望我可以幫到你
⑷ 用易語言編寫文件加密程序，謝謝
先下載精易模塊。
然後再在「_啟動窗口_創建完畢」里加上這幾句命令：
.版本
2
文件_關聯
(,
「要關聯的後綴名」,
,
「文件」,
)
取命令行
(啟動命令行)
.如果真
(取數組成員數
(啟動命令行)
≠
0)
（這個地方加上你要處理的命令，我寫個例子。）
寫到文件（取運行目錄（）+「\解密後文件.exe」，解密數據（讀入文件（啟動命令行[1]），「加密密碼」）)
運行
(取運行目錄
()
＋
「\解密後文件.exe」,
假,
)
.如果真結束
結束
()
⑸ 怎麼給易語言的一段代碼加密
.版本 2
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
.子程序 _按鈕1_被單擊
.如果 (編輯框1.內容 ＝ 「123456」)
信息框 (「密碼正確」, 0, 「恭喜」)
.否則
信息框 (「密碼錯誤」, 0, 「！」)
返回 ()
.如果結束
' 這里寫密碼正確後執行的程序
' 需要1個編輯框和一個按鈕，分別為『按鈕1』和『編輯框1』
⑹ 易語言編寫的軟體如何加密，要簡單易懂的。
1.新建啟動窗口（密碼輸入所在窗口） 2.插入窗口 （程序所在窗口） 窗口1 編輯框1個 按鈕一個 代碼 .版本 2 .如果 (編輯框1.內容 ＝「xxxxxx」) xxxxxx就是你自己的密碼 載入(窗口1, , 真) .否則 編輯框1.內容 ＝ 「重新輸入密碼」
⑺ 易語言怎麼加密字元數字
直接用【 加密數據 （）】
調用格式： 〈位元組集〉 加密數據 （位元組集 位元組集數據，文本型 密碼文本，［整數型 加密演算法］） - 數據操作支持庫一->數據加解密
英文名稱：Encrypt
加密一段位元組集數據，返回加密後的結果位元組集。如果失敗，返回空位元組集。本命令為初級命令。
參數<1>的名稱為「位元組集數據」，類型為「位元組集（bin）」。為命令提供所需的位元組集數據。
參數<2>的名稱為「密碼文本」，類型為「文本型（text）」。
參數<3>的名稱為「加密演算法」，類型為「整數型（int）」，可以被省略。指定具體使用的加密演算法，可以為以下常量值之一：1: #DES演算法； 2: #RC4演算法。加密和解密必須使用相同的演算法，有關演算法的具體說明請參閱有關文獻。如果本參數被省略，則默認值為1，即DES演算法。
操作系統需求： Windows、Linux
⑻ 易語言代碼錯誤（加密解密問題）
編輯框1解密後數據 ＝ 到文本 (解密數據 (到位元組集 (讀配置項 (取運行目錄 () ＋ 「\test.ini」, 「配置」, 「配置1」, )), 「123」, 1))
編輯框2解密後數據 ＝ 到文本 (加密數據 (到位元組集 (讀配置項 (取運行目錄 () ＋ 「\test.ini」, 「配置」, 「配置2」, )), 「123」, 1))
編輯框3解密後數據 ＝ 到文本 (加密數據 (到位元組集 (讀配置項 (取運行目錄 () ＋ 「\test.ini」, 「配置」, 「配置3」, )), 「123」, 1))
編輯框4解密後數據 ＝ 到文本 (加密數據 (到位元組集 (讀配置項 (取運行目錄 () ＋ 「\test.ini」, 「配置」, 「配置4」, )), 「123」, 1))
這幾句明顯有錯誤啊，解密過程，你下面三句都是加密。
另外看看解密過程對不對。
⑼ 易語言文件加密 解密寫法
加密解密可以自己寫。最簡單並世哪的就是去文返御件絕碼的長度，然後循環一遍，把每個位元組+1或-1，解密是同樣方法響應的-1或+1
⑽ 怎麼在易語言里加密某個數字字母
假如你的密碼是：110
自己寫也一個加密的演算法 比如【密碼加一 加密後為 111】，或是 用 + - * / 左移 右移 各種做法 （這種方法初學者常用）
然後把用 把 加密後的 密碼 【111】 方進去 再調用一個解密的方法 （加密的逆運算）
這樣別人看到你的就是加密後的密碼
以上是 初學者的方法
再給你講寫進階級的方法
利用資料庫 ，吧密碼和賬號 都利用 加密演算法後放進資料庫
軟體直接讀取 資料庫里加密的 賬號 和密碼