加密后台数据库的办法[Access防范]
本文“加密后台数据库的办法[Access防范]”是由七道奇为您精心收集，来源于网络转载，文章版权归文章作者所有，本站不对其观点以及内容做任何评价，请读者自行判断，以下是其具体内容：
地球人都知道,MDB文件很不安全,破解MDB文件密码的软件层出不穷,那能否假如我们MDB作后台数据库,是不是就等于任人宰割了呢?我认为未必是这样的.
我用过不少Access密码破解器,大大都都只能处理英文密码,因此我们可以针对这一特点,把MDB文件的数据库密码设置为中文的,这样便可以抵挡大部份破解器的攻击了.
一定有人会说,既然人家能写出破解英文密码娜砑??欢ㄒ部梢孕闯銎平庵形拿苈氲娜砑?Ｕ饩浠耙坏愣济淮恚?还?颐腔褂械诙?校焊?奈募?贰?
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
以上是“加密后台数据库的办法[Access防范]”的内容，如果你对以上该文章内容感兴趣，你可以看看七道奇为您推荐以下文章：
| 本文地址： | 与您的QQ/BBS好友分享! |
- 好的评价 如果您觉得此文章好，就请您
0%(0) 
- 差的评价 如果您觉得此文章差，就请您
0%(0) 
- ·上一篇文章：找回忘了的密码的原理
- ·下一篇文章：处理加了密码的MDB文件
- ·
中查找“加密后台数据库的办法”更多相关内容 - ·
中查找“加密后台数据库的办法”更多相关内容