使用易語言對db數據庫進行加密的方法
易語言程序如下：
.版本 2
.程序集 窗口程序集_啟動窗口
.子程序 _按鈕1_被單擊, , , 打開
.如果 (打開 (“test.edb”, , , , , 編輯框1.內容, ) ＝ 假)
信息框 (“打開數據庫失敗！”, 0, , )
.否則
信息框 (“打開數據庫成功！”, 0, , )
.如果結束
.子程序 _按鈕2_被單擊, , , 置數據庫密碼
.如果 (置數據庫密碼 (編輯框1.內容) ＝ 真)
信息框 (“置數據庫密碼成功！”, 0, , )
.否則
信息框 (“數據庫設置密碼失敗！”, 0, , )
.如果結束
關閉 ()
.子程序 _按鈕3_被單擊, , , 是否已加密
.如果 (是否已加密 (“test.edb”) ＝ 真)
信息框 (“置數據已經加密！”, 0, , )
.否則
信息框 (“置數據未加密！”, 0, , )
.如果結束
.子程序 _按鈕4_被單擊, , , 密碼輸入框
.局部變量 密碼變量, 文本型
.如果 (是否已加密 (“test.edb”) ＝ 真)
密碼輸入框 (密碼變量, )
.如果 (打開 (“test.edb”, , , , , 密碼變量, ) ＝ 假)
信息框 (“打開數據庫失敗！”, 0, , )
.否則
信息框 (“打開數據庫成功！”, 0, , )
.如果結束
.否則
信息框 (“置數據未加密！”, 0, , )
.如果結束
關閉 ()
