欢迎来到天天文库
浏览记录
ID:25326366
大小:50.68 KB
页数:3页
时间:2018-11-19
《vb加密access数据库及介绍》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、在专业的数据库软件开发中,为了确保数据库中信息的安全,往往要求对数据库文件进行加密,以防止非法用户通过其它的常规手段将其打开。那么,在VisualBasic中如何建立与加密的数据库的连接呢?笔者在日常工作中,总结了一些方法和技巧,现写出来与同行们交流。 一、连接加密的Access数据库,假设要连接的数据库为hg.mdb,密码为“123” 在VisualBasic6.0中,要建立与数据库的连接,可采用的技术手段很多,如:数据控件、数据对象、数据环境设计器等。 1、使用控件 ①Data控件 Data控件是VisualBasic6.0中的一个
2、内置数据控件,可以通过设置Data控件的connect、DatabaseName、RecordSource属性实现对数据库的连接和访问。通过Data控件连接加密的数据库的方法有两种: 一种方法是在设计状态时,在“属性窗口”中将Data控件的connect属性的缺省值”Access”改为”;pwd=123”即可,其它属性的设置方法与没有加密的Access数据库的连接相同。 另一种方法是在运行时,通过代码对connect属性赋值来实现。如:Data1.connect=”;pwd=123”Data1.DatabaseName=APP.path+“
3、hg.mdb” 其中,”123”为Access数据库文件hg.mdb的密码,下同。 ②Adodc控件Adodc控件是一个ActiveX控件,它使用MicrosoftActiveXDataObjects(ADO)创建到数据库的连接。使用Adodc控件之前,要先将Adodc控件添加到控件工具箱中。方法如下:在VB6.0种选择“工程”菜单,再点击“部件”菜单项,在弹出的“部件”对话框中选中“MicrosoftADODataControl6.0(OLEDB)”选项即可。 通过Adodc控件连接加密的数据库的方法也有两种: 一种方法是在设计状态时,在
4、“属性窗口”中,对Adodc控件的ConnectionString属性设置一个有效的连接字符串,并在连接字符串后增加上”;JetOLEDB:DataBasepassword=123”,再设置Adodc控件的CommandType、RecordSource的属性就可以创建到加密的数据库的连接了。 另一种方法是在运行时,通过代码动态地设置ConnectionString、CommandType和RecordSource属性来创建连接。只要在ConnectionString属性的有效连接字符串后增加上”;JetOLEDB:DataBasepasswo
5、rd=123”即可。 2、使用数据对象 ①DAO数据对象 要能正确引用DAO数据对象来建立与数据库的连接,应先在VB集成开发环境中选择“工程”菜单,再点击“引用”菜单项,在弹出的“引用”对话框选择“MicrosoftDAO3.51ObjectLibrary”选项来添加DAO数据对象类型库。 接下来就可用如下代码来建立到加密的Access数据库hg.mdb的连接。 DimdbASDataBaseSetdb=OpenDataBase(App.path+“hg.mdb”,False,False,”;pwd=123”) ②ADO数据对象
6、ADO是Microsoft推出的处理关系数据库和非关系数据库中信息的最新技术,也是Microsoft推崇的用于数据连接和访问的技术。在VB6.0中,Adodc控件、ADO数据对象及DataEnvironment(数据环境设计器)都采用的是ADO技术,因而它们处理加密的Access数据库的方法类似。 要能正确引用ADO数据对象,应在VB6.0集成开发环境中选择“工程”菜单,再点击“引用”菜单项,在弹出的“引用”对话框中选中“MicrosoftActiveXDataObjects2.1Library”选项来添加ADO数据对象类型库。可用如下代码来建
7、立到加密的Access数据库hg.mdb的连接。DimcnnASADODB.ConnectionDimrstASADODB.RecordsetSetcnn=NewADODB.ConnectionCnn.Provider=”Microsoft.Jet.OLEDB.3.51”Cnn.ConnectionString=”DataSource=”&App.path&”hg.mdb;”&_”;JetOLEDB:Databasepassword=123”cnn.Open ③使用DataEnvironment(数据环境设计器) 有两种方法可以通过Data
8、Environment连接到加密的Access数据库: 一种方法是在设计状态时,在DataEnvironment的connection
此文档下载收益归作者所有