在Access中實現密碼管理的另一種方式
2024-07-21 02:12:32
供稿：網友
大家都知道，數據庫的安全性是很重要的，它直接影響到數據庫的廣泛應用。用戶可以采用任意一種方法來保護數據庫應用程序，也可以將幾種方法結合起來使用。利用access數據庫自身提供的加密功能及其他保護方法是很容易的，我就不多說了。在access數據庫中，嵌入了一種很強的數據庫操作語言——visualbasic語言，所以可以采用visualbasic編寫程序，來實現一些復雜的功能。下面將介紹如何在visualbasic程序中實現加密功能，以確保數據的安全性。
---- 對于一些公司來說，職員的工資管理是一個不大不小的問題。有時，領導需要了解一段時間內每個職員的收入如何，以便掌握各項獎金的發放情況。為此，我設計了一個“工資管理”數據庫，可以按時間進行查詢，并根據所選的工資類別進行統計。為了防止其他人查看此數據庫，我采用“獨占”方式給數據庫設置了密碼。這種方法也有一定的局限性，如果用戶恰巧提供了正確的數據庫密碼，該方法就不能控制用戶對數據庫進行操作。
---- 為了進一步防止職員查看工資的統計結果（即有些獎金并不是公開的，除領導以外的其他人不應該知道工資數目），我又創建了一個密碼表，設置好密碼，記住并將其隱藏起來（先選中“密碼表”，再單擊“窗口”菜單中的“隱藏”命令，即可把此表隱藏起來）。然后，在“職工工資對話框”窗體中，添加“密碼”文本框，并在“預覽”及“打印”的事件過程中加入下列語句：
docmd.applyfilter , "密碼 = forms!
職工工資對話框!passtext"
if not isnull([密碼]) then
/*其他代碼*/
else
msgbox "請輸入正確的密碼！"
passtext.setfocus
end if
/*其他代碼*/
---- 這樣，就實現了雙重加密功能。即使用戶能進入數據庫，如果第二次沒有提供正確的密碼，他也不能預覽和打印一定時間范圍的統計結果。這就進一步限制了用戶的非授權訪問 。
---- 為了提高數據庫的安全性，每隔一段時間都應更改密碼。為此，在“職工工資對話框”窗體中，我又添加了一個“更改密碼”子窗體，在此窗體中加入下列代碼，即可隨時更改密碼 ：
private sub確定_click()
on error goto err_確定_click
docmd.applyfilter , "密碼
= forms!更改密碼!text1"
if isnull([密碼]) then
msgbox ("密碼不正確，
請再輸入一次")
text1.setfocus
goto exit_確定_click:
end if
if text3.value < > text2.value then
text3.setfocus
msgbox ("請輸入正確的確認密碼")
else:
密碼 = text3.value
docmd.close
end if
exit_確定_click:
exit sub
err_確定_click:
msgbox err.description
resume exit_確定_click
end sub
---- 更改密碼后，應記住此密碼，以備以后使用。
---- 設計好程序，并將有關代碼隱藏起來（與隱藏“ 表”的方法相同），以防其他人修改或偷看。這里介紹的方法只是在程序中實現加密功能的一個小技巧，在其他數據庫管理中，也可采用此方法進行加密。也許存在更為簡潔的方法，有待大家在編程過程中發掘出來并互相交流。
