1.首先,要用#import语句来引用支持ADO的组件类型库(*.tlb),其中类型库可以作为可执行程序 (DLL、EXE等)的一部分被定位在其自身程序中的附属资源里,如:被定位在msado15.dll的附属资源中,只需要直接用 #import引用它既可。可以直接在Stdafx.h文件中加入下面语句来实现:
3.接着,就可以直接使用ADO的操作了。我们经常使用的只是前面用#import语句引用类型库时,生成的包装类.tlh中声明的智能指针中的三个,它 们分别是_ConnectionPtr、_RecordsetPtr和_CommandPtr。下面分别对它们的使用方法进行介绍:
_ConnectionPtr接 口返回一个记录集或一个空指针。通常使用它来创建一个数据连接或执行一条不返回任何结果的SQL语句,如一个存储过程。使用 _ConnectionPtr接口返回一个记录集不是一个好的使用方法。对于要返回记录的操作通常用_RecordserPtr来实现。而用 _ConnectionPtr操作时要想得到记录条数得遍历所有记录,而用_RecordserPtr时不需要。
_CommandPtr接 口返回一个记录集。它提供了一种简单的方法来执行返回记录集的存储过程和SQL语句。在使用_CommandPtr接口时,你可以利用全局 _ConnectionPtr接口,也可以在_CommandPtr接口里直接使用连接串。如果你只执行一次或几次数据访问操作,后者是比较好的选择。但 如果你要频繁访问数据库,并要返回很多记录集,那么,你应该使用全局_ConnectionPtr接口创建一个数据连接,然后使用_CommandPtr 接口执行存储过程和SQL语句。
_RecordsetPtr是一 个记录集对象。与以上两种对象相比,它对记录集提供了更多的控制功能,如记录锁定,游标控制等。同_CommandPtr接口一样,它不一定要使用一个已 经创建的数据连接,可以用一个连接串代替连接指针赋给 _RecordsetPtr的connection成员变量,让它自己创建数据连接。如果你要使用多个记录集,最好的方法是同Command对象一样使用 已经创建了数据连接的全局_ConnectionPtr接口,然后使用_RecordsetPtr执行存储过程和SQL语句。
特别声明:如果是MFC程序,则初始化ado组件就不需要用CoInitialize(NULL), 只需要在**App::InitInstance()函数中调用AfxOleInit();即可:例如:
- BOOL CMyAdoTestApp::InitInstance()
- {
- if(!AfxOleInit())
- {
- AfxMessageBox(“OLE初始化出错!”);
- return FALSE;
- }
创建一个对话框程序。新建一个名为ADOConn的类,在头文件中导入msado15.dll
语句如下:
- #import "C:/Program Files/Common Files/System/ado/msado15.dll" no_namespace
-
- rename("EOF","adoEOF")rename("BOF","adoBOF")
这句话主要作用是引入ADO类库。
1:在ADOConn.h头文件中为类添加变量和初始化函数
-
- _ConnectionPtr m_pConnection;
-
-
- _RecordsetPtr m_pRecordset;
-
- void ADOConn::OnInitADOConn()
-
- {
-
-
- ::CoInitialize(NULL);
-
- try
-
- {
-
-
- m_pConnection.CreateInstance("ADODB.Connection");
-
-
-
- _bstr_t strConnect="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security
-
-
- Info=False;Initial Catalog=data;Data Source=.";
-
-
-
- m_pConnection->Open(strConnect,"","",adModeUnknown);
-
- }
-
-
- catch(_com_error e)
-
- {
-
-
- AfxMessageBox(e.Description());
-
- }
-
- }
2:为ADOConn类添加GetRecordSet的函数,目的是打开并获得记录集,代码如下:
- _RecordsetPtr& ADOConn::GetRecordSet(_bstr_t bstrSQL)
-
- {
-
- try
-
- {
-
-
- if(m_pConnection==NULL)
-
- OnInitADOConn();
-
-
- m_pRecordset.CreateInstance(__uuidof(Recordset));
-
-
- m_pRecordset->Open(bstrSQL,m_pConnection.GetInterfacePtr(),
-
- adOpenDynamic,adLockOptimistic,adCmdText);
-
- }
-
- catch(_com_error e)
-
- {
-
- e.Description();
-
- }
-
-
- return m_pRecordset;
-
- }
3:在ADOConn类中添加ExecteSQL函数,目的是用来执行SQL语句,代码如下:
- BOOL ADOConn::ExecuteSQL(_bstr_t bstrSQL)
-
- {
-
- _variant_t RecordsAffected;
-
- try
-
- {
-
-
- if(m_pConnection==NULL)
-
- OnInitADOConn();
-
- m_pConnection->Execute(bstrSQL,NULL,adCmdText);
-
- return true;
-
- }
-
- catch(_com_error e)
-
- {
-
- e.Description();
-
- return false;
-
- }
-
- }
4:设置退出记录集类
- void ADOConn::ExitConnect()
-
- {
-
-
- if(m_pRecordset!=NULL)
-
- m_pRecordset->Close();
-
- m_pConnection->Close();
-
-
- }
5:为对话框添加一个ListControl控件按钮,并设置属性为Report
为ListControl控件关联一个对象CListCtrl m_grid;
在初始化对话框函数里面添加
-
- m_grid.SetExtendedStyle(LVS_EX_FLATSB
-
- |LVS_EX_FULLROWSELECT
-
- |LVS_EX_HEADERDRAGDROP
-
- |LVS_EX_ONECLICKACTIVATE
-
- |LVS_EX_GRIDLINES);
-
- m_grid.InsertColumn(0,"编号",LVCFMT_LEFT,100,0);
-
- m_grid.InsertColumn(1,"姓名",LVCFMT_LEFT,100,1);
-
- m_grid.InsertColumn(2,"性别",LVCFMT_LEFT,100,2);
-
- ADOConn m_AdoConn;
-
- m_AdoConn.OnInitADOConn();
-
- CString sql;
-
- sql.Format("select* from employees order by 编号 desc");
-
- _RecordsetPtr m_pRecordset;
-
- m_pRecordset = m_AdoConn.GetRecordSet((_bstr_t)sql);
-
- while(m_AdoConn.m_pRecordset->adoEOF==0)
-
- {
-
- m_grid.InsertItem(0,"");
-
- m_grid.SetItemText(0,0,(char*)(_bstr_t)m_pRecordset->GetCollect("编号"));
-
- m_grid.SetItemText(0,1,(char*)(_bstr_t)m_pRecordset->GetCollect("姓名"));
-
- m_grid.SetItemText(0,2,(char*)(_bstr_t)m_pRecordset->GetCollect("性别"));
-
- m_pRecordset->MoveNext();
-
- }
-
- m_AdoConn.ExitConnect();
6:添加数据.
在对话框添加两个EditBox控件和一个Combox控件和一个按钮控件
如下图:
关联对象如下
- CString m_id,m_name;CComboBox m_combo;
-
-
- m_combo.InsertString(0,"男");
-
- m_combo.InsertString(1,"女");
-
- m_combo.SetCurSel(0);
-
-
- UpdateData(true);
-
- if(m_id.IsEmpty())
-
- {
-
- MessageBox("编号不能为空");
-
- return;
-
- }
-
- if(m_name.IsEmpty())
-
- {
-
- MessageBox("姓名不能为空");
-
- return;
-
- }
-
- ADOConn m_AdoConn;
-
- m_AdoConn.OnInitADOConn();
-
- _bstr_t sql;
-
- sql = "select*from employees";
-
- _RecordsetPtr m_pRecordset;
-
- m_pRecordset=m_AdoConn.GetRecordSet(sql);
-
- CString sex;
-
- m_combo.GetLBText(m_combo.GetCurSel(),sex);
-
- try
-
- {
-
- m_pRecordset->AddNew();
-
- m_pRecordset->PutCollect("编号",(_bstr_t)m_id);
-
- m_pRecordset->PutCollect("姓名",(_bstr_t)m_name);
-
- m_pRecordset->PutCollect("性别",(_bstr_t)sex);
-
- m_AdoConn.ExitConnect();
-
- }
-
- catch(...)
-
- {
-
- MessageBox("操作失败");
-
- return;
-
- }
-
- MessageBox("保存成功");
-
- m_grid.DeleteAllItems();
-
- AddToGrid();
7 修改记录集
在添加一个EditBox控件,关联对象CString m_old;用来保存,修改之前的编号;
添加修改按钮,并响应事件,代码如下:
以上总结了,SQL连接四种基本操作