1. 生成應用程序框架并初始化OLE/COM庫環境

　　創建一個標準的MFC AppWizard(exe)應用程序，然后在使用ADO數據庫的InitInstance函數中初始化OLE/COM庫（因為ADO庫是一個COM DLL庫）。
　　本例為：

　　BOOL CAdotestDlg::OnInitDialog()
　　{
　　 ::CoInitialize(NULL); //初始化OLE/COM庫環境
　　 }

　　程序最后要調用 ::CoUninitialize()；//釋放程序占用的COM 資源。

　　另外：

　　m_pRecordset->Close(); 注意！！！不要多次關閉！！！！！！！！！！！！
　　m_pConnection->Close();
　　m_pRecordset = NULL;
　　m_pConnection = NULL;

　　2. 引入ADO庫文件

　　使用ADO前必須在工程的stdafx.h文件最后用直接引入符號＃import引入ADO庫文件，以使編譯器能正確編譯。代碼如下：
　　#import "C:\Program Files\common files\system\ado\msado15.dll" no_namespace rename("EOF","adoEOF")

　　ADO類的定義是作為一種資源存儲在ADO DLL(msado15.dll）中，在其內部稱為類型庫。類型庫描述了自治接口，以及C＋＋使用的COM vtable接口。當使用＃import指令時，在運行時Visual C＋＋需要從ADO DLL中讀取這個類型庫，并以此創建一組C＋＋頭文件。這些頭文件具有.tli 和.tlh擴展名，讀者可以在項目的目錄下找到這兩個文件。在C＋＋程序代碼中調用的ADO類要在這些文件中定義。
　　程序的第三行指示ADO對象不使用名稱空間。在有些應用程序中，由于應用程序中的對象與ADO中的對象之間可能會出現命名沖突，所以有必要使用名稱空間。如果要使用名稱空間，則可把第三行程序修改為： rename_namespace("AdoNS")。第四行代碼將ADO中的EOF(文件結束)更名為adoEOF，以避免與定義了自己的EOF的其他庫沖突。

　　3．利用智能指針進行數據庫操作

　　在CaboutDlg頭文件中定義兩個ADO智能指針類實例,并在對話框中加入一個ListCtrl。

　　 class CAdotestDlg : public CDialog
　　{
　　 _ConnectionPtr m_pConnection;
　　 _RecordsetPtr m_pRecordset;
　　 ClistCtrl m_List;
　　 ......
　　}
　　ADO庫包含三個智能指針:_ConnectionPtr、_CommandPtr和_RecordsetPtr。

　　_ConnectionPtr通常被用來創建一個數據連接或執行一條不返回任何結果的SQL語句，如一個存儲過程。
　　_CommandPtr返回一個記錄集。它提供了一種簡單的方法來執行返回記錄集的存儲過程和SQL語句。在使用_CommandPtr接口時，可以利用全局_ConnectionPtr接口，也可以在_CommandPtr接口里直接使用連接串。　　_RecordsetPtr是一個記錄集對象。與以上兩種對象相比，它對記錄集提供了更多的控制功能，如記錄鎖定、游標控制等。

　　在使用ADO程序的事件響應中OnButton1加入以下代碼:

　　void CAdotestDlg::OnButton1()
　　{
　　 m_List.ResetContent();
　　 m_pConnection.CreateInstance(_uuidof(Connection)); //初始化Connection指針
　　 m_pRecordset.CreateInstance(_uuidof(Recordset));//初始化Recordset指針
　　 try
　　 {
　　 m_pConnection->Open("DSN=ADOTest","","",0); //連接叫作ADOTest的ODBC數據源
　　 //注意：這是連接不需要用戶ID或密碼的open 函數
　　 // 否則形式為 ->Open("DSN=test;uid=sa;pwd=123;","","",0);
　　
　　 // 執行SQL語句得到一個記錄集把其指針賦值給m_pRecordset
　　 CString strSql="select * from middle";
　　 BSTR bstrSQL = strSql.AllocSysString();
　　 m_pRecordset->Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
　　 //adOpenDynamic：動態 adLockOptimistic樂觀封鎖法 adCmdText：文本查詢語句
　　 while(!m_pRecordset->adoEOF)//遍歷所有記錄
　　 {
　　 //取紀錄字段值方式之一
　　 _variant_t TheValue; //VARIANT數據類型
　　 TheValue = m_pRecordset->GetCollect("BIG_NAME");//得到字段BIG_NAME的值
　　 if(TheValue.vt!=VT_NULL)
　　 m_List.AddString((char*)_bstr_t(TheValue));
　　 //將該值加入到列表控件中
　　 //取紀錄字段值方式之二
　　 // _bstr_t TheValue1=m_pRecordset->Fields->GetItem("BIG_NAME")->Value;
　　 // CString temp=TheValue1.copy();
　　 // m_List.AddString(temp);
　　 //數據類型轉換
　　 _variant_t vUsername,vBirthday,vID,vOld;
　　 TRACE("id:%d,姓名:%s,年齡:%d,生日:%s\r\n",
　　 vID.lVal,(LPCTSTR)(_bstr_t)vUsername,vOld.lVal,(LPCTSTR)(_bstr_t)vBirthday);

　　 m_pRecordset->MoveNext();//轉到下一條紀錄
　　 }
　　 m_pRecordset->Close();
　　 m_pConnection->Close();
　　 }
　　 catch (_com_error e)//異常處理
　　 {
　　 AfxMessageBox(e.ErrorMessage());
　　 }
　　 m_pRecordset->Close(); //注意！！！不要多次關閉！！！！否則會出錯
　　 m_pConnection->Close();
　　 m_pRecordset = NULL;
　　 m_pConnection = NULL;
　　}

　　程序中通過_variant_t和_bstr_t轉換COM對象和C＋＋類型的數據, _variant_t類封裝了OLE自治VARIANT數據類型。在C++中使用_variant_t類要比直接使用VARIANT數據類型容易得多。

　　好，編譯后該程序就能運行了，但記住運行前要創建一個叫ADOTest的ODBC數據源。該程序將把表middle中的BIG_NAME字段值顯示在列表控件中。