当前位置:Gxlcms > mysql > VC6.0中使用ADO操作Access数据库

VC6.0中使用ADO操作Access数据库

时间:2021-07-01 10:21:17 帮助过:57人阅读

由于我的程序只是简单的储存网址和标题,Access小而简单,所以就选择Access作为本小软件的数据库,并采用ADO访问数据库。 以下数据库内容摘自孙鑫老师的VC20讲第20课数据库访问的PPT 数据库访问技术 1. ODBC(Open Database Connectivity),开放数据库互连。O


由于我的程序只是简单的储存网址和标题,Access小而简单,所以就选择Access作为本小软件的数据库,并采用ADO访问数据库。
以下数据库内容摘自孙鑫老师的”VC20讲第20课数据库访问的PPT”
数据库访问技术
1. ODBC(Open Database Connectivity),开放数据库互连。ODBC是上个世纪八十年代末九十年代初出现的技术,它为编写关系数据库的客户软件提供了一种统一的接口。 ODBC提供一个单一的API,可用于处理不同数据库的客户应用程序。使用ODBC API的应用程序可以与任何具有ODBC驱动程序的关系数据库进行通信。

2. DAO(Data Access Object),数据访问对象。DAO就是一组Microsoft Access/Jet数据库引擎的COM自动化接口。 DAO不像ODBC那样是面向C/C++程序员的,它是微软提供给Visual Basic开发人员的一种简单的数据访问方法,用于操纵Access数据库。

3. RDO(Remote Data Object),远程数据对象。由于RDO直接调用ODBC API(而不是像DAO那样通过Jet引擎),所以,可以为使用关系数据库的应用程序提供更好的性能。

4. OLE DB,对象链接与嵌入数据库。 OLE DB在两个方面对ODBC进行了扩展。首先, OLE DB提供了一个数据库编程的COM接口;第二, OLE DB提供了一个可用于关系型和非关系型数据源的接口。 OLE DB的两个基本结构是OLE DB提供程序(Provider)和OLE DB用户程序(Consumer)。

5. ADO(ActiveX Data Object),ActiveX数据对象,它建立在OLE DB之上。ADO是一个OLE DB用户程序。使用ADO的应用程序都要间接地使用OLE DB。ADO简化了OLE DB,提供了对自动化的支持,使得像VBScript这样的脚本语言也能够使用ADO访问数据库。

ADO的三个核心对象
1.Connection对象
Connection对象表示了到数据库的连接,它管理应用程序和数据库之间的通信。 Recordset和Command对象都有一个ActiveConnection属性,该属性用来引用Connection对象。

2.Command对象
Command对象被用来处理重复执行的查询,或处理需要检查在存储过程调用中的输出或返回参数的值的查询。

3.Recordset对象
Recordset对象被用来获取数据。 Recordset对象存放查询的结果,这些结果由数据的行(称为记录)和列(称为字段)组成。每一列都存放在Recordset的Fields集合中的一个Field对象中。

用VC连接Access的方法如下:

1.将msado15.dll动态库拷贝到你应用程序所在的文件夹,msado15.dll一般放在C:/Program Files/Common Files/System/ado目录下,你也可以通过Windows的收搜功能进行收搜。
在头文件StdAfx.h中加上#import "msado15.dll" no_namespace rename ("EOF", "adoEOF")
因为记录集的结尾是EOF,而文件的结尾也是EOF,所以这里为了避免冲突,将其重新命名为adoEOF。编译程序,这时在你的Debug目录下多出现两 个文件:msado15.tlh和msado15.tli,这是msado15.dll在编译时自动生成的,有时候可以帮助你了解一些函数、常数的含义。

2.初始化ADO并连接数据库
Ado实际上是一个COM组件,所以我们在使用它之前要进行初始化,结束后要卸载。
加上一个成员变量 _ConnectionPtr m_pConnection; //连接数据库的智能指针
// 初始化—连接数据库
// 初始化OLE/COM库环境
::CoInitialize(NULL);
……
hr=m_pConnection.CreateInstance(__uuidof(Connection)); //实例化连接对象
……
m_pConnection->ConnectionString= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=helper.mdb"; //连接数据库
//如果Access数据库中设置了密码,那么此句应为
//m_pConnection->ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=helper.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123456";
还有这里涉及一个字符串过长的问题,该字符串在一行中写不下去,需多行输出。
如CString str=”123456789”; 分两行写为:
Str=”123456”/ //为清楚末尾加 / 在VC中不加也可以,但不要有分号
“789”;

……
m_pConnection->ConnectionTimeout=10; //设置等待连接打开的时间为10秒
hr=m_pConnection->Open("","","",adConnectUnspecified);//打开连接
……(失败、异常处理)

3.数据库读取、修改、删除
……
CString strSQL=”select * from stock”;
_RecordsetPtr pQueryRecordset;
……
hr=pQueryRecordset.CreateInstance(__uuidof(Recordset));
……
pQueryRecordset->Open(_variant_t(strSQL),m_pConnection.GetInterfacePtr(),
adOpenDynamic,adLockOptimistic,adCmdText); //打开数据库
……
if((pQueryRecordset->BOF)&&(pQueryRecordset->adoEOF))//记录集没有记录
{ …… }
else
{
_variant_t var; CString strValue; int curItem;
……
while(!pQueryRecordset->adoEOF)
{
var = pQueryRecordset->GetCollect("title");
strValue = (LPCSTR)_bstr_t(var);
ListCtrl.InsertItem(curItem,strValue);
…… //这里的多少取决你的字段…….
pQueryRecordset->MoveNext();
curItem++;
}
}
……
修改
Recordset->PutCollect("visit", (LPCTSTR)visit );
Recordset->Update();
增加
Recordset->AddNew();
Recordset->PutCollect("visit", (LPCTSTR)visit );
Recordset->Update();

删除表
strSQL=”delete from stock”;
Recordset->Open(_variant_t(strSQL),_variant_t((IDispatch*)m_pConnection,true),
adOpenStatic,adLockOptimistic,adCmdText);

4.撤消数据库连接,卸载ADO
m_pConnection->Close(); // 释放环境
::CoUninitialize();

另外,由于Access会对你的数据进行排序,所以你读出的数据次序不一定会跟你写进Access时一致。

人气教程排行