ADO接口

转自百度文库

ADO中最重要的对象有三个：Connection、Recordset和Command，分别表示连接对象、记录集对象和命令对象。

三个对象对应的智能指针分别是：_ConnectionPtr、_RecordsetPtr、_CommandPtr。

ADO使用_ConnectionPtr这个指针来操纵Connection对象，类似地，后面用到的_CommandPtr和_RecordsetPtr分别表示命令对象指针和记录集对象指针。

Connection对象是这三个对象的基础，它的主要作用是建立与数据库的连接，建立了与数据库的连接后，才能进行其它有关数据库的访问和操作。也就是说，使用ADO操作数据库，通常先用Connection对象的Open方法打开一个库连接，然后才能进行数据库的操作。操作完成后，要关闭这个库连接。

本文只讲述Connection对象最常用的Open方法和Execute方法。

注意：在使用ADO进行操作之前，必须使用AfxOleInit()函数来进行初始化；

1. Open()方法

用于打开一个库连接，而Execute()方法一般用于执行一条SQL语句。

_ConnectionPtr智能指针的用法：

首先定义一个Connection类型的指针，然后调用CreateInstance()来创建一个连接对象的实例，再调用Open()函数建立与数据源的连接。

在建立连接对象后，可以使用连接对象的Execute()函数来执行SQL命令。

_ConnectionPtr智能指针Open()方法的原型：

Open(_bstr_t ConnectionString,_bstr_t UserID,_bstr_t Password,long Options)

ConnectionString为连接字串，UserID是用户名，Password是登陆密码

Options是连接选项，可以是如下几个常量：

1> adModeUnknown 缺省，当前的许可权未设置

2> adModeRead 只读

3> adModeWrite 只写

4> adModeReadWrite 可以读写

5> adModeShareDenyRead 阻止其它Connection对象以读权限打开连接

6> adModeShareDenyWrite 阻止其它Connection对象以写权限打开连接

7> adModeShareExclusive 阻止其它Connection对象打开连接

8> adModeShareDenyNone 阻止其它程序或对象以任何权限建立连接

2. Execute方法

函数原型：

_RecordsetPtr Connection::Execute(_bstr_t CommandText,VARIANT* RecordsAffected,long Options)

参数：

CommandText是命令字串，通常是SQL命令，

RecordsAffected是操作完成后所影响的行数

Options表示CommandText中内容的类型，可以取下列值之一：

1> adCmdText 表明CommandText是文本命令

2>adCmdTable 表明CommandText是一个表名

3>adCmdProc 表明CommandText是一个存储过程

4>adCmdUnknown 未知

Execute执行完后返回一个指向记录集的指针(_ResultsetPtr类型)

3. 异常捕获

出现的异常为：_com_error

例程CREATE_DB_AND_TABLE中已经使用了_ConnectionPtr指针的Open方法和Execute方法，在后面的例程我们将进一步详细说明。

例程

ConnPtr_Open_Exe

打开VC++ 6.0，新建一个基于对话框的工程ConnPtr_Open_Exe。在对话框IDD_CONNPTR_OPEN_EXE_DIALOG中进行编辑：

使用三个Group Box分成三个部分，第一部分演示使用Execute()函数来执行INSERT INTO命令；第二部分演示使用Execute()函数来执行Update命令；第三部分演示使用Execute()函数来执行SELECT命令。其中，第一部分和第二部分不需要返回记录集，第三部分演示返回记录集显示结果。

该对话框几个控件如下：

控件名称 ID 用途

按钮 IDC_BTN_INSERT_INTO 执行INSERT INTO语句

按钮 IDC_BTN_UPDATE 执行Update语句

按钮 IDC_BTN_SELECT 执行SELECT语句

列表框 IDC_LIST1 显示SELECT语句执行结果

使用ClassWizard给列表框IDC_LIST1创建CListBox变量m_list1：

双击IDC_BTN_INSERT_INTO按钮，并编辑OnBtnInsertInto()函数如下：

void CConnPtr_Open_ExeDlg::OnBtnInsertInto()
{
_ConnectionPtr m_pConnection;
_variant_t RecordsAffected;
try
{
m_pConnection.CreateInstance(__uuidof(Connection));
m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Northwind.mdb","","",adModeUnknown);
}
catch(_com_error e)
{
CString errormessage;
errormessage.Format("连接数据库失败!\r错误信息:%s",e.ErrorMessage());
AfxMessageBox(errormessage);
return;
}
try
{
_bstr_t strCmd="INSERT INTO Employees(EmployeeID,FirstName,LastName,HireDate,City,Country) VALUES(10,'Mary','Williams','15/4/1993 12:00:00','New York','USA')";
m_pConnection->Execute(strCmd,&RecordsAffected,adCmdText);
}
catch(_com_error &e)
{
AfxMessageBox(e.Description());
}
if(m_pConnection->State)
{
m_pConnection->Close();
}
}

void CConnPtr_Open_ExeDlg::OnBtnInsertInto()

{

	_ConnectionPtr m_pConnection;

	_variant_t RecordsAffected;

	try

	{

		m_pConnection.CreateInstance(__uuidof(Connection));

		m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Northwind.mdb","","",adModeUnknown);

	}

	catch(_com_error e)

	{

		CString errormessage;

		errormessage.Format("连接数据库失败!\r错误信息:%s",e.ErrorMessage());

		AfxMessageBox(errormessage);

		return;

	}

	try

	{

		_bstr_t strCmd="INSERT INTO Employees(EmployeeID,FirstName,LastName,HireDate,City,Country) VALUES(10,'Mary','Williams','15/4/1993 12:00:00','New York','USA')";

		m_pConnection->Execute(strCmd,&RecordsAffected,adCmdText);

	}

	catch(_com_error &e)

	{

		AfxMessageBox(e.Description());

	}

	if(m_pConnection->State)

	{

		m_pConnection->Close();

	}

}

双击IDC_BTN_UPDATE按钮，并编辑OnBtnUpdate()函数如下：

void CConnPtr_Open_ExeDlg::OnBtnUpdate()
{
_ConnectionPtr m_pConnection;
_variant_t RecordsAffected;
try
{
m_pConnection.CreateInstance(__uuidof(Connection));
m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Northwind.mdb","","",adModeUnknown);
}
catch(_com_error e)
{
CString errormessage;
errormessage.Format("连接数据库失败!\r错误信息:%s",e.ErrorMessage());
AfxMessageBox(errormessage);
return;
}
try
{
_bstr_t strCmd="UPDATE Employees SET FirstName='Bill',LastName='Clinton',HireDate='25/11/1994 12:00:00',City='Los Angeles' WHERE EmployeeID=10";
m_pConnection->Execute(strCmd,&RecordsAffected,adCmdText);
}
catch(_com_error &e)
{
AfxMessageBox(e.Description());
}
if(m_pConnection->State)
{
m_pConnection->Close();
}
}

void CConnPtr_Open_ExeDlg::OnBtnUpdate()

{

	_ConnectionPtr m_pConnection;

	_variant_t RecordsAffected;

	try

	{

		m_pConnection.CreateInstance(__uuidof(Connection));

		m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Northwind.mdb","","",adModeUnknown);

	}

	catch(_com_error e)

	{

		CString errormessage;

		errormessage.Format("连接数据库失败!\r错误信息:%s",e.ErrorMessage());

		AfxMessageBox(errormessage);

		return;

	}

	try

	{

		_bstr_t strCmd="UPDATE Employees SET FirstName='Bill',LastName='Clinton',HireDate='25/11/1994 12:00:00',City='Los Angeles' WHERE EmployeeID=10";

		m_pConnection->Execute(strCmd,&RecordsAffected,adCmdText);

	}

	catch(_com_error &e)

	{

		AfxMessageBox(e.Description());

	}

	if(m_pConnection->State)

	{

		m_pConnection->Close();

	}

}

双击IDC_BTN_SELECT按钮，并编辑OnBtnSelect()函数如下：

void CConnPtr_Open_ExeDlg::OnBtnSelect()
{
_ConnectionPtr m_pConnection;
_variant_t RecordsAffected;
_RecordsetPtr m_pRecordset;
try
{
m_pConnection.CreateInstance(__uuidof(Connection));
m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Northwind.mdb","","",adModeUnknown);
}
catch(_com_error e)
{
CString errormessage;
errormessage.Format("连接数据库失败!\r错误信息:%s",e.ErrorMessage());
AfxMessageBox(errormessage);
return;
}
try
{
m_pRecordset.CreateInstance("ADODB.Recordset"); //为Recordset对象创建实例
_bstr_t strCmd="SELECT EmployeeID,FirstName,LastName,HireDate,City FROM Employees WHERE City='London'";
m_pRecordset=m_pConnection->Execute(strCmd,&RecordsAffected,adCmdText);
}
catch(_com_error &e)
{
AfxMessageBox(e.Description());
}
_variant_t vEmployeeID,vFirstName,vLastName,vHireDate,vCity;
try
{
while(!m_pRecordset->adoEOF)
{
vEmployeeID=m_pRecordset->GetCollect(_variant_t((long)0));
//取得第1列的值，从0开始计数，你也可以直接列出列的名称，如下一行
vFirstName=m_pRecordset->GetCollect("FirstName");
vLastName=m_pRecordset->GetCollect("LastName");
vHireDate=m_pRecordset->GetCollect("HireDate");
vCity=m_pRecordset->GetCollect("City");
CString strtemp;
if(vEmployeeID.vt!=VT_NULL)
{
strtemp.Format("%d",vEmployeeID.lVal);
}
if(vFirstName.vt!=VT_NULL)
{
strtemp+=" ";
strtemp+=(LPCTSTR)(_bstr_t)vFirstName;
}
if(vLastName.vt!=VT_NULL)
{
strtemp+=" ";
strtemp+=(LPCTSTR)(_bstr_t)vLastName;
}
if(vHireDate.vt!=VT_NULL)
{
strtemp+=" ";
strtemp+=(LPCTSTR)(_bstr_t)vHireDate;
}
if(vCity.vt!=VT_NULL)
{
strtemp+=" ";
strtemp+=(LPCTSTR)(_bstr_t)vCity;
}
m_list1.AddString(strtemp);
m_list1.AddString("\n");
//移动到下一条记录
m_pRecordset->MoveNext();
}
}
catch(_com_error &e)
{
AfxMessageBox(e.Description());
}
m_pRecordset->Close();
m_pRecordset=NULL;
m_pConnection->Close();
m_pConnection=NULL;
}

void CConnPtr_Open_ExeDlg::OnBtnSelect()

{

	_ConnectionPtr m_pConnection;

	_variant_t RecordsAffected;

	_RecordsetPtr m_pRecordset;

	try

	{

		m_pConnection.CreateInstance(__uuidof(Connection));

		m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Northwind.mdb","","",adModeUnknown);

	}

	catch(_com_error e)

	{

		CString errormessage;

		errormessage.Format("连接数据库失败!\r错误信息:%s",e.ErrorMessage());

		AfxMessageBox(errormessage);

		return;

	}

	try

	{

		m_pRecordset.CreateInstance("ADODB.Recordset"); //为Recordset对象创建实例

		_bstr_t strCmd="SELECT EmployeeID,FirstName,LastName,HireDate,City FROM Employees WHERE City='London'";

		m_pRecordset=m_pConnection->Execute(strCmd,&RecordsAffected,adCmdText);

	}

	catch(_com_error &e)

	{

		AfxMessageBox(e.Description());

	}

	_variant_t vEmployeeID,vFirstName,vLastName,vHireDate,vCity;

	try

	{

		while(!m_pRecordset->adoEOF)

		{

			vEmployeeID=m_pRecordset->GetCollect(_variant_t((long)0));

			//取得第1列的值，从0开始计数，你也可以直接列出列的名称，如下一行

			vFirstName=m_pRecordset->GetCollect("FirstName");

			vLastName=m_pRecordset->GetCollect("LastName");

			vHireDate=m_pRecordset->GetCollect("HireDate");

			vCity=m_pRecordset->GetCollect("City");

			CString strtemp;

			if(vEmployeeID.vt!=VT_NULL)

			{

				strtemp.Format("%d",vEmployeeID.lVal);

			}

			if(vFirstName.vt!=VT_NULL)

			{

				strtemp+=" ";

				strtemp+=(LPCTSTR)(_bstr_t)vFirstName;

			}

			if(vLastName.vt!=VT_NULL)

			{

				strtemp+=" ";

				strtemp+=(LPCTSTR)(_bstr_t)vLastName;

			}

			if(vHireDate.vt!=VT_NULL)

			{

				strtemp+=" ";

				strtemp+=(LPCTSTR)(_bstr_t)vHireDate;

			}

			if(vCity.vt!=VT_NULL)

			{

				strtemp+=" ";

				strtemp+=(LPCTSTR)(_bstr_t)vCity;

			}

			m_list1.AddString(strtemp);

			m_list1.AddString("\n");

			//移动到下一条记录

			m_pRecordset->MoveNext();

		}

	}

	catch(_com_error &e)

	{

		AfxMessageBox(e.Description());

	}

	m_pRecordset->Close();

	m_pRecordset=NULL;

	m_pConnection->Close();

	m_pConnection=NULL;

}

附加操作（重要）：

1> 在stdafx.h中加入如下语句：

#import "C:\Program Files\Common Files\system\ado\msado15.dll" rename("EOF","adoEOF")

2> 在BOOL CConnPtr_Open_ExeApp::InitInstance()函数中加入：

AfxOleInit();

该部分演示了如何使用_ConnectionPtr接口开发ACCESS数据库：先创建一个Connection对象实例，然后用Open方法打开一个库连接，最后使用Execute方法执行SQL语句进行其它有关数据库的访问和操作。

巴特西

ADO接口

最新文章

热门文章