建站
咨詢
售后
建站咨詢
新聞中心
這里有您想知道的互聯(lián)網營銷解決方案
使用易語言怎么加密文件夾
使用易語言怎么加密文件夾？相信很多沒有經驗的人對此束手無策，為此本文總結了問題出現(xiàn)的原因和解決方法，通過這篇文章希望你能解決這個問題。
南開網站建設公司創(chuàng)新互聯(lián),南開網站設計制作，有大型網站制作公司豐富經驗。已為南開近1000家提供企業(yè)網站建設服務。企業(yè)網站搭建\外貿網站建設要多少錢，請找那個售后服務好的南開做網站的公司定做！
加密鎖上文件夾
此功能需要加載精易模塊5.6
.版本 2 .支持庫 shell .支持庫 spec .支持庫 dp1 .程序集 窗口程序集1 .程序集變量 密碼, 文本型 .子程序 _按鈕_瀏覽文件_被單擊 編輯框_路徑.內容 ＝ 瀏覽文件夾 (“打開你需要加密的文件”, ) .子程序 _按鈕_加密_被單擊 .局部變量 文件夾名稱, 文本型 .判斷開始 (尋找文本 (編輯框_路徑.內容, “[已加密]”, , 假) ≠ -1) 提示框 (“已加密”) .默認 文件夾名稱 ＝ 取文本右邊 (編輯框_路徑.內容, 取文本長度 (編輯框_路徑.內容) － 倒找文本 (編輯框_路徑.內容, “\”, , 假)) 調試輸出 (文件夾名稱) 目錄_改名 (編輯框_路徑.內容, 文件夾名稱 ＋ “[已加密]”) 編輯框_路徑.內容 ＝ 編輯框_路徑.內容 ＋ “[已加密]” 輸入框 (“請輸入密碼”, “請輸入密碼”, “”, 密碼, #輸入密碼) 文件_枚舉1 (編輯框_路徑.內容, “*.*”, &子程序_加密) 提示框 (“完成”) .判斷結束 .子程序 _按鈕_解密_被單擊 .局部變量 文件夾名稱, 文本型 .判斷開始 (尋找文本 (編輯框_路徑.內容, “[已加密]”, , 假) ≠ -1) 編輯框_路徑.內容 ＝ 文本_替換 (編輯框_路徑.內容, , , , “[已加密]”, “”) 文件夾名稱 ＝ 取文本右邊 (編輯框_路徑.內容, 取文本長度 (編輯框_路徑.內容) － 倒找文本 (編輯框_路徑.內容, “\”, , 假)) 目錄_改名 (編輯框_路徑.內容 ＋ “[已加密]”, 文件夾名稱) 輸入框 (“請輸入密碼”, “請輸入密碼”, “”, 密碼, #輸入密碼) 文件_枚舉1 (編輯框_路徑.內容, “*.*”, &子程序_加密) 提示框 (“完成”) .默認 提示框 (“已解密”) .判斷結束 .子程序 子程序_加密 .參數(shù) 目錄, 文本型 .參數(shù) 文件名, 文本型 .局部變量 路徑, 文本型 .局部變量 未加密, 字節(jié)集 .局部變量 已加密, 字節(jié)集 路徑 ＝ 目錄 ＋ 文件名 未加密 ＝ 讀入文件 (路徑) 已加密 ＝ 加密數(shù)據 (未加密, 密碼, #RC4算法) 寫到文件 (路徑, 已加密) .子程序 子程序_解密 .參數(shù) 目錄, 文本型 .參數(shù) 文件名, 文本型 .局部變量 路徑, 文本型 .局部變量 已加密, 字節(jié)集 .局部變量 已解密, 字節(jié)集 路徑 ＝ 目錄 ＋ 文件名 已加密 ＝ 讀入文件 (路徑) 已解密 ＝ 解密數(shù)據 (已加密, 密碼, #RC4算法) 寫到文件 (路徑, 已解密)
運行結果：
看完上述內容，你們掌握使用易語言怎么加密文件夾的方法了嗎？如果還想學到更多技能或想了解更多相關內容，歡迎關注創(chuàng)新互聯(lián)行業(yè)資訊頻道，感謝各位的閱讀！
網站標題：使用易語言怎么加密文件夾
轉載來于：http://www.dlmjj.cn/article/pescsc.html
