欢迎来到天天文库
浏览记录
ID:1748591
大小:30.00 KB
页数:5页
时间:2017-11-13
《工商管理电子商务毕业论文 vb6连接设置密码的access2000数据库》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库。
1、湖南师范大学本科毕业论文考籍号:XXXXXXXXX姓名:XXX专业:工商管理电子商务论文题目:VB6连接设置密码的ACCESS2000数据库指导老师:XXX二〇一一年十二月十日[摘要]本文说明了在VisualBasic6.0中如何正确连接已经设置密码的Access2000格式的数据库,详细介绍了Data控件、DAO及ADO三种方式的多种方法,并给出了有关代码。 [关键词]VB连接密码Access2000 在专业的数据库软件开发中,为了确保数据库中信息的安全,往往要求对其使用的ACCESS数据库文件设置安全密码,以防
2、止非法用户通过其它的常规手段将其打开,从而保护数据库不被非系统授权的修改或破坏。目前有很多文章介绍如何打开设置密码的Access97格式数据库,但不适用于Access2000格式的数据库,因此如何在VisualBasic6.0中连接已经设置密码的Access2000格式的数据库是很多程序员需要解决的问题。笔者在实际操作中总结出几种连接方法,下面以qhdedu.mdb数据库(密码:123456)为例说明具体连接方法。 一、Data控件方式 Data控件是VisualBasic6.0中的一个内置数据控件,可以通过设置Dat
3、a控件的Connect、DatabaseName、RecordSource属性实现对数据库的连接和访问。通过Data控件连接加密的数据库的方法有两种: 第一种方法是设计时,在“属性窗口”中将Data控件的Connect属性的缺省值“Access2000”改为“Access2000;pwd=123456”即可,其它属性的设置与没有加密的Access数据库的连接设置相同。 第二种方法是在运行时,通过代码对Connect属性赋值来实现。如: Data1.DatabaseName=App.Path“qhdedu.mdb”
4、 Data1.Connect=“Access2000;pwd=123456” Data1.RecordSource=“ACONF”‘ACONF为数据库中一个表 二、DAO方式 利用DBEngine的OpenDatabase()方法打开设置密码的数据库。 打开数据库格式: Setdb=OpenDatabase(dbname[,exclusive[,readonly[,source[,password]]]]) 关闭数据库:db.colse 打开数据表:Setrs=db.OpenRecordset(source[
5、,type[,options]]) 关闭数据表:rs.close 具体连接代码如下: Setdb=OpenDatabase(App.Path“qhdedu.mdb”,True,True,“;Pwd=123456”) Setrs=db.OpenRecordset(“ACONF”,dbOpenDynaset) SetData1.Recordset=rs‘设置控件Data1的属性 三、ADO方式 ADO是Microsoft推出的处理关系数据库和非关系数据库中信息的最新技术,也是Microsoft推崇的用于数据连接
6、和访问的技术。在VisualBasic6.0中,Adodc控件、ADO数据对象及DataEnvironment(数据环境设计器)都采用的是ADO技术,因而它们处理加密的Access数据库的方法类似。 1.Adodc控件法:在VisualBasic6.0集成开发环境中选择“工程”菜单,再点击“部件”菜单项,在弹出的“部件”对话框中选中“MicrosoftAdoDataControl6.0(Sp6)”及“MicrosoftDataGridControl6.0(Sp6)”选项,这样就可以在窗体上添加控件“Adodc1”与“Da
7、taGrid1”。具体代码如下: connstring=“Provider=Microsoft.Jet.OLEDB.4.0;DataSource=”App.Path“qhdedu.mdb”“;PersistSecurityInfo=False;JetOLEDB:DatabaseLockingMode=1;JetOLEDB:databasepassword=‘123456’” Adodc1.ConnectionString=connstring Adodc1.RecordSource=“select*fromACON
8、F” SetDataGrid1.DataSource=Adodc1 2.ADO数据对象法:要能正确引用ADO数据对象,应在VisualBasic6.0集成开发环境中选择“工程”菜单,再点击“引用”菜单项,在弹出的“引用”对话框中选中“MicrosoftActiveXDataObjects2.6Lib
此文档下载收益归作者所有