程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 數據庫知識 >> Access數據庫 >> 關於Access數據庫 >> 加密後台數據庫的方法

加密後台數據庫的方法

編輯:關於Access數據庫
地球人都知道,MDB文件很不安全,破解MDB文件密碼的軟件層出不窮,那是否如果我們MDB作後台數據庫,是不是就等於任人宰割了呢?我覺得未必是這樣的。
我用過不少Access密碼破解器,大多數都只能處理英文密碼,因此我們可以針對這一特點,把MDB文件的數據庫密碼設置為中文的,這樣就可以抵擋大部份破解器的攻擊了。
一定有人會說,既然人家能寫出破解英文密碼娜砑歡ㄒ部梢孕闖銎平庵形拿苈氲娜砑U饩浠耙壞愣濟淮恚還頤腔褂械诙校焊奈募貳?
MDB的頭16個字節保存著文件類型、版本等諸如此類的重要信息,Access靠這些信息來識別它們,如果我們改動一個或多個字節,Access就會因無法識別這些文件而打不開它們,也就達到了我們的目的:加密MDB文件。加密思路如下:
打開文件時,把正確的頭文件內容寫入相應的位置,我們自已的程序就可以訪問它,關閉文件時把更改過的錯誤的頭文件內容寫入相應的位置。這樣做有個弊端,就是程序運行時,後台文件是可以訪問的,只有關閉後才加密,那麼當程序運行時,別人如果知道了數據庫密碼,還是可以查看或導出數據的。
另一種做法是打開後台數據庫後,馬上建立一個持續到程序結束的物理連接,然後再把錯誤的文件頭內容寫入相應的位置,這樣在程序運行當中,我們的前台程序是可以正常訪問後台數據的,而不知道我們的加密方法的人是無法打開後台文件的。

'使後台可以正常訪問
Function OpenHt(HTmdbPath As String)
Dim fh As Integer
fh = FreeFile
Open HTmdbPath For Binary Access Write As #fh
Put fh, 2, &H1
Close #fh
End Function

'使後台無法正常訪問
Function CloseHt(HTmdbPath As String)
Dim fh As Integer
fh = FreeFile
Open HTmdbPath For Binary Access Write As #fh
Put fh, 2, &H0
Close #fh
End Function

'下面的都是跟後台建立物理連接的函數(必須放在模塊裡)
Public HTcn As Connection
Public HTrs As New ADODB.Recordset
Public HTsql As String

'建立物理連接
Function OpenStandHT()
Set HTcn = CurrentProject.Connection
'表1要改成相應的表名
HTsql = "select * from 表1"
HTrs.Open HTsql, HTcn, 3, 3, 1
End Function

'關閉物理連接的函數,如退出程序時,或需要壓縮後台文件時就要關閉物理連接
Function CloseStandHT()
HTrs.Close
Set HTcn = Nothing
End Function

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved