c++ ADO數據庫

VC用ADO訪問數據庫全攻略,介紹了VC用ADO來訪問數據庫的各個對象及各方法，很經典，也很實用，很值得一看。 

正文 
1、ADO概述 
ADO 是Microsoft爲最新和最強大的數據訪問範例 OLE DB 而設計的，是一個便於使用的應用程序層接口。ADO 使您可以編寫應用程序以經過 OLE. DB 提供者訪問和操做數據庫服務器中的數據。ADO 最主要的優勢是易於使用、速度快、內存支出少和磁盤遺蹟小。ADO 在關鍵的應用方案中使用最少的網絡流量，而且在前端和數據源之間使用最少的層數，全部這些都是爲了提供輕量、高性能的接口。之因此稱爲 ADO，是用了一個比較熟悉的暗喻，OLE 自動化接口。

OLE DB是一組」組件對象模型」(COM) 接口，是新的數據庫低層接口，它封裝了ODBC的功能，並以統一的方式訪問存儲在不一樣信息源中的數據。OLE DB是Microsoft UDA(Universal Data Access)策略的技術基礎。OLE DB 爲任何數據源提供了高性能的訪問，這些數據源包括關係和非關係數據庫、電子郵件和文件系統、文本和圖形、自定義業務對象等等。也就是說，OLE DB 並不侷限於 ISAM、Jet 甚相當係數據源，它可以處理任何類型的數據，而不考慮它們的格式和存儲方法。在實際應用中，這種多樣性意味着能夠訪問駐留在 Excel 電子數據表、文本文件、電子郵件/目錄服務甚至郵件服務器，諸如 Microsoft Exchange 中的數據。可是，OLE DB 應用程序編程接口的目的是爲各類應用程序提供最佳的功能，它並不符合簡單化的要求。您須要的API 應該是一座鏈接應用程序和OLE DB 的橋樑，這就是 ActiveX Data Objects (ADO)。

2、在VC中使用ADO(開發步驟好下：)

一、引入ADO庫文件

使用ADO前必須在工程的stdafx.h頭文件裏用直接引入符號#import引入ADO庫文件,以使編譯器能正確編譯。代碼以下所示：

用#import引入ADO庫文件

#import "c:\program files\common files\system\ado\msado15.dll"no_namespaces rename("EOF" adoEOF")

這行語句聲明在工程中使用ADO，但不使用ADO的名字空間，而且爲了不常數衝突，將常數EOF更名爲adoEOF。如今不需添加另外的頭文件，就可使用ADO接口了。

二、初始化OLE/COM庫環境 
必須注意的是，ADO庫是一組COM動態庫，這意味應用程序在調用ADO前，必須初始化OLE/COM庫環境。在MFC應用程序裏，一個比較好的方法是在應用程序主類的InitInstance成員函數裏初始化OLE/COM庫環境。

BOOL CMyAdoTestApp：：InitInstance() 
{ 
if(!AfxOleInit())//這就是初始化COM庫 
{ 
AfxMessageBox(「OLE初始化出錯!」); 
return FALSE; 
}

……

}

三、ADO接口簡介

ADO庫包含三個基本接口:_ConnectionPtr接口、_CommandPtr接口和_RecordsetPtr接口。 
_ConnectionPtr 接口返回一個記錄集或一個空指針。一般使用它來建立一個數據鏈接或執行一條不返回任何結果的SQL語句，如一個存儲過程。使用 _ConnectionPtr接口返回一個記錄集不是一個好的使用方法。對於要返回記錄的操做一般用_RecordserPtr來實現。而用 _ConnectionPtr操做時要想獲得記錄條數得遍歷全部記錄，而用_RecordserPtr時不須要。

_CommandPtr 接口返回一個記錄集。它提供了一種簡單的方法來執行返回記錄集的存儲過程和SQL語句。在使用_CommandPtr接口時，你能夠利用全局 _ConnectionPtr接口，也能夠在_CommandPtr接口裏直接使用鏈接串。若是你只執行一次或幾回數據訪問操做，後者是比較好的選擇。但 若是你要頻繁訪問數據庫，並要返回不少記錄集，那麼，你應該使用全局_ConnectionPtr接口建立一個數據鏈接，而後使用_CommandPtr 接口執行存儲過程和SQL語句。

_RecordsetPtr 是一個記錄集對象。與以上兩種對象相比，它對記錄集提供了更多的控制功能，如記錄鎖定，遊標控制等。同_CommandPtr接口同樣，它不必定要使用一 個已經建立的數據鏈接，能夠用一個鏈接串代替鏈接指針賦給_RecordsetPtr的connection成員變量，讓它本身建立數據鏈接。若是你要使 用多個記錄集，最好的方法是同Command對象同樣使用已經建立了數據鏈接的全局_ConnectionPtr接口 
，而後使用_RecordsetPtr執行存儲過程和SQL語句。

四、使用_ConnectionPtr接口 
_ConnectionPtr主要是一個鏈接接口，取得與數據庫的鏈接。它的鏈接字符串能夠是本身直接寫，也能夠指向一個ODBC DSN。。 
  _ConnectionPtr pConn; 
if (FAILED(pConn.CreateInstance("ADODB.Connection"))) 
{ 
AfxMessageBox("Create Instance failed!"); 
return; 
}

CString strSRC; 
strSRC="Driver=SQL Server;Server="; 
strSRC+="suppersoft"; 
strSRC+=";Database="; 
strSRC+="mydb"; 
strSRC+=";UID=SA;PWD=";

CString strSQL = "Insert into student(no,name,sex,address) values(3,'aaa','male','beijing')";

_variant_t varSRC(strSRC); 
_variant_t varSQL(strSQL); 
_bstr_t bstrSRC(strSRC);

if (FAILED(pConn->Open(bstrSRC,"","",-1))) 
{ 
AfxMessageBox("Can not open Database!"); 
pConn.Release(); 
return; 
}

COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR);

pConn->Execute(_bstr_t(strSQL),&vtOptional,-1);

pConn.Release();

AfxMessageBox("ok!");

五、使用_RecordsetPtr接口(以鏈接SQL Server爲例) 
_RecordsetPtr pPtr; 
if (FAILED(pPtr.CreateInstance("ADODB.Recordset"))) 
{ 
AfxMessageBox("Create Instance failed!"); 
return FALSE; 
}

CString strSRC; 
strSRC="Driver=SQL Server;Server="; 
strSRC+="210.46.141.145"; 
strSRC+=";Database="; 
strSRC+="mydb"; 
strSRC+=";UID=sa;PWD="; 
strSRC+="sa";

CString strSQL = "select id,name,gender,address from personal";

_variant_t varSRC(strSRC); 
_variant_t varSQL(strSQL);

if(FAILED(pPtr->Open(varSQL,varSRC,adOpenStatic,adLockOptimistic,adCmdText))) 
{ 
AfxMessageBox("Open table failed!"); 
pPtr.Release(); 
return FALSE; 
}

while(!pPtr->GetadoEOF()) 
{ 
_variant_t varNo; 
_variant_t varName; 
_variant_t varSex; 
_variant_t varAddress;

varNo = pPtr->GetCollect ("id"); 
varName = pPtr->GetCollect ("name"); 
varSex = pPtr->GetCollect ("gender"); 
varAddress = pPtr->GetCollect ("address");

CString strNo =(char *)_bstr_t(varNo); 
CString strName =(char *)_bstr_t(varName); 
CString strSex =(char *)_bstr_t(varSex); 
CString strAddress =(char *)_bstr_t(varAddress);

strNo.TrimRight(); 
strName.TrimRight(); 
strSex.TrimRight(); 
strAddress.TrimRight();

int nCount = m_list.GetItemCount(); 
int nItem = m_list.InsertItem (nCount,_T("")); 
m_list.SetItemText (nItem,0,strNo); 
m_list.SetItemText (nItem,1,strName); 
m_list.SetItemText (nItem,2,strSex); 
m_list.SetItemText (nItem,3,strAddress);

pPtr->MoveNext(); 
}

pPtr->Close(); 
pPtr.Release();

六、使用_CommandPtr接口 
_CommandPtr接口返回一個Recordset對象，而且提供了更多的記錄集控制功能，如下代碼示例了使用_CommandPtr接口的方法：

代碼11:使用_CommandPtr接口獲取數據 
_CommandPtr pCommand; 
_RecordsetPtr pRs; 
pCommand.CreateInstance(__uuidof(Command)); 
pCommand->ActiveConnection=pConn; 
pCommand->CommandText="select * from student"; 
pCommand->CommandType=adCmdText; 
pCommand->Parameters->Refresh(); 
pRs=pCommand->Execute(NULL,NULL,adCmdUnknown); 
_variant_t varValue = pRs->GetCollect("name"); 
CString strValue=(char*)_bstr_t(varValue);

六、關於數據類型轉換因爲COM對象是跨平臺的，它使用了一種通用的方法來處理各類類型的數據， 
所以Cstring 類和COM對象是不兼容的，咱們須要一組API來轉換COM對象和C++類型的數據。_vatiant_t和_bstr_t就是這樣兩種對象。它們提供了通用的方法轉換COM對象和C++類型的數據。

............................................................................................

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字段值顯示在列表控件中。

在Visual C++中用ADO進行數據庫編程(中) 
4．執行SQL命令並取得結果記錄集

    爲了取得結果記錄集，咱們定義一個指向Recordset對象的指針:_RecordsetPtr m_pRecordset; 
併爲其建立Recordset對象的實例: m_pRecordset.CreateInstance("ADODB.Recordset"); 
SQL命令的執行能夠採用多種形式，下面咱們一進行闡述。

(1)利用Connection對象的Execute方法執行SQL命令

Execute方法的原型以下所示:

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

     其中CommandText是命令字串，一般是SQL命令。 
參數RecordsAffected是操做完成後所影響的行數, 
參數Options表示CommandText中內容的類型，Options能夠取以下值之一： 
adCmdText:代表CommandText是文本命令 
adCmdTable:代表CommandText是一個表名 
adCmdProc:代表CommandText是一個存儲過程 
adCmdUnknown:未知

    Execute執行完後返回一個指向記錄集的指針，下面咱們給出具體代碼並做說明。 
    _variant_t RecordsAffected; 
    ///執行SQL命令：CREATE TABLE建立表格users,users包含四個字段:整形ID,字符串username,整形old,日期型birthday 
    m_pConnection->Execute("CREATE TABLE users(ID INTEGER,username TEXT,old INTEGER,birthday DATETIME)", 
   &RecordsAffected, 
   adCmdText);

    ///往表格裏面添加記錄 
    m_pConnection->Execute("INSERT INTO users(ID,username,old,birthday) VALUES (1, ''''Washington'''',25,''''1970/1/1'''')",&RecordsAffected,adCmdText);

    ///將全部記錄old字段的值加一 
    m_pConnection->Execute("UPDATE users SET old = old+1",&RecordsAffected,adCmdText);

    ///執行SQL統計命令獲得包含記錄條數的記錄集 
    m_pRecordset =  m_pConnection->Execute("SELECT COUNT(*) FROM users",&RecordsAffected,adCmdText); 
    _variant_t vIndex = (long)0; 
    _variant_t vCount = m_pRecordset->GetCollect(vIndex);///取得第一個字段的值放入vCount變量 
    上兩句能夠寫成— _variant_t vCount = m_pRecordset->GetCollect((_variant_t)((long)0)); 
    m_pRecordset->Close();///關閉記錄集 
    CString message; 
    message.Format("共有%d條記錄",vCount.lVal); 
    AfxMessageBox(message);///顯示當前記錄條數

(2)利用Command對象來執行SQL命令

_CommandPtr m_pCommand; 
m_pCommand.CreateInstance("ADODB.Command"); 
_variant_t vNULL; 
vNULL.vt = VT_ERROR; 
vNULL.scode = DISP_E_PARAMNOTFOUND;///定義爲無參數 
m_pCommand->ActiveConnection = m_pConnection;///很是關鍵的一句，將創建的鏈接賦值給它 
m_pCommand->CommandText = "SELECT * FROM users";///命令字串 
m_pRecordset = m_pCommand->Execute(&vNULL,&vNULL,adCmdText);///執行命令，取得記錄集

在這段代碼中咱們只是用Command對象來執行了SELECT查詢語句，Command對象在進行存儲過程的調用中能真正體現它的做用。下次咱們將詳細介紹。

(3)直接用Recordset對象進行查詢取得記錄集

實例——

void CGmsaDlg::OnDBSelect() 
{ 
    // TODO: Add your control notification handler code here 
     _RecordsetPtr Rs1;  //定義Recordset對象 
    _bstr_t Connect("DSN=GMS;UID=sa;PWD=;");//定義鏈接字符串 
    _bstr_t Source ("SELECT count(*) FROM buaa.mdb010");  //要執行的SQL語句 
    ::CoInitialize(NULL);    //初始化Rs1對象 
        HRESUL hr = Rs1.CreateInstance( __uuidof( Recordset ) ); 
       //省略對返回值hr的判斷 
     Rs1->Open( Source, 
            Connect, 
                adOpenForwardOnly, 
                    adLockReadOnly, 
            -1 ); 
    _variant_t temp=Rs1->GetCollect(_variant_t((long)0)); 
    CString strTemp=(char* )(_bstr_t)temp; 
    MessageBox("OK!"+strTemp); 
}

例如 
  m_pRecordset->Open("SELECT * FROM users", 
  _variant_t((IDispatch *)m_pConnection,true), 
  adOpenStatic, 
  adLockOptimistic, 
  adCmdText);

Open方法的原型是這樣的: 
HRESULT Recordset15::Open ( const _variant_t & Source, 
   const _variant_t & ActiveConnection, 
   enum CursorTypeEnum CursorType, 
   enum LockTypeEnum LockType, 
   long Options )

其中：

①Source是數據查詢字符串 
②ActiveConnection是已經創建好的鏈接（咱們須要用Connection對象指針來構造一個_variant_t對象) 
③CursorType光標類型，它能夠是如下值之一,請看這個枚舉結構:

enum CursorTypeEnum 
{ 
adOpenUnspecified = -1,///不做特別指定 
adOpenForwardOnly = 0,///前滾靜態光標。這種光標只能向前瀏覽記錄集，好比用MoveNext向前滾動,這種方式能夠提升瀏覽速度。但諸如 BookMark,RecordCount,AbsolutePosition,AbsolutePage都不能使用 
adOpenKeyset = 1,///採用這種光標的記錄集看不到其它用戶的新增、刪除操做，但對於更新原有記錄的操做對你是可見的。

adOpenDynamic = 2,///動態光標。全部數據庫的操做都會當即在各用戶記錄集上反應出來。 
adOpenStatic = 3///靜態光標。它爲你的記錄集產生一個靜態備份，但其它用戶的新增、刪除、更新操做對你的記錄集來講是不可見的。 
}; 
④LockType鎖定類型，它能夠是如下值之一，請看以下枚舉結構：

enum LockTypeEnum 
{ 
adLockUnspecified = -1,///未指定 
adLockReadOnly = 1,///只讀記錄集 
adLockPessimistic = 2,悲觀鎖定方式。數據在更新時鎖定其它全部動做，這是最安全的鎖定機制 
adLockOptimistic = 3,樂觀鎖定方式。只有在你調用Update方法時才鎖定記錄。在此以前仍然能夠作數據的更新、插入、刪除等動做 
adLockBatchOptimistic = 4，樂觀分批更新。編輯時記錄不會鎖定，更改、插入及刪除是在批處理模式下完成。 
};

⑤Options能夠取以下值之一： 
adCmdText:代表CommandText是文本命令 
adCmdTable:代表CommandText是一個表名 
adCmdProc:代表CommandText是一個存儲過程 
adCmdUnknown:未知

十、邦定數據

定義一個綁定類，將其成員變量綁定到一個指定的記錄集，以方便於訪問記錄集的字段值。

(1). 從CADORecordBinding派生出一個類：

class CCustomRs : public CADORecordBinding 
{ 
BEGIN_ADO_BINDING(CCustomRs) 
ADO_VARIABLE_LENGTH_ENTRY2(3, adVarChar, m_szau_fname, 
sizeof(m_szau_fname), lau_fnameStatus, false) 
ADO_VARIABLE_LENGTH_ENTRY2(2, adVarChar, m_szau_lname, 
sizeof(m_szau_lname), lau_lnameStatus, false) 
ADO_VARIABLE_LENGTH_ENTRY2(4, adVarChar, m_szphone, 
sizeof(m_szphone), lphoneStatus, true) 
END_ADO_BINDING()

public: 
CHAR m_szau_fname[22]; 
ULONG lau_fnameStatus; 
CHAR m_szau_lname[42]; 
ULONG lau_lnameStatus; 
CHAR m_szphone[14]; 
ULONG lphoneStatus; 
};

其中將要綁定的字段與變量名用BEGIN_ADO_BINDING宏關聯起來。每一個字段對應於兩個變量，一個存放字段的值，另外一個存放字段的狀態。字段用從1開始的序號表示，如1，2，3等等。

特 別要注意的是：若是要綁定的字段是字符串類型，則對應的字符數組的元素個數必定要比字段長度大2（好比m_szau_fname[22]，其綁定的字段 au_fname的長度實際是20），不這樣綁定就會失敗。我分析多出的2多是爲了存放字符串結尾的空字符null和BSTR字符串開頭的一個字（表示 BSTR的長度）。這個問題對於初學者來講多是一個意想不到的問題。

CADORecordBinding類的定義在icrsint.h文件裏，內容是：

class CADORecordBinding 
{ 
public: 
STDMETHOD_(const ADO_BINDING_ENTRY*, GetADOBindingEntries) (VOID) PURE; 
};

BEGIN_ADO_BINDING宏的定義也在icrsint.h文件裏，內容是： 
#define BEGIN_ADO_BINDING(cls) public: \ 
typedef cls ADORowClass; \ 
const ADO_BINDING_ENTRY* STDMETHODCALLTYPE GetADOBindingEntries() { \ 
static const ADO_BINDING_ENTRY rgADOBindingEntries[] = {

ADO_VARIABLE_LENGTH_ENTRY2宏的定義也在icrsint.h文件裏： 
#define ADO_VARIABLE_LENGTH_ENTRY2(Ordinal, DataType, Buffer, Size, Status, Modify)\ 
{Ordinal, \ 
DataType, \ 
0, \ 
0, \ 
Size, \ 
offsetof(ADORowClass, Buffer), \ 
offsetof(ADORowClass, Status), \ 
0, \ 
classoffset(CADORecordBinding, ADORowClass), \ 
Modify},

#define END_ADO_BINDING宏的定義也在icrsint.h文件裏： 
#define END_ADO_BINDING() {0, adEmpty, 0, 0, 0, 0, 0, 0, 0, FALSE}};\ 
return rgADOBindingEntries;}

(2). 綁定

_RecordsetPtr Rs1; 
IADORecordBinding *picRs=NULL; 
CCustomRs rs; 
...... 
Rs1->QueryInterface(__uuidof(IADORecordBinding), 
(LPVOID*)&picRs)); 
picRs->BindToRecordset(&rs);

派生出的類必須經過IADORecordBinding接口才能綁定，調用它的BindToRecordset方法就好了。

(3). rs中的變量便是當前記錄字段的值

//Set sort and filter condition: 
// Step 4: Manipulate the data 
Rs1->Fields->GetItem("au_lname")->Properties->GetItem("Optimize")->Value = true; 
Rs1->Sort = "au_lname ASC"; 
Rs1->Filter = "phone LIKE '415 5*'";

Rs1->MoveFirst(); 
while (VARIANT_FALSE == Rs1->EndOfFile) 
{ 
printf("Name: %s\t %s\tPhone: %s\n", 
(rs.lau_fnameStatus == adFldOK ? rs.m_szau_fname : ""), 
(rs.lau_lnameStatus == adFldOK ? rs.m_szau_lname : ""), 
(rs.lphoneStatus == adFldOK ? rs.m_szphone : "")); 
if (rs.lphoneStatus == adFldOK) 
strcpy(rs.m_szphone, "777"); 
TESTHR(picRs->Update(&rs)); // Add change to the batch 
Rs1->MoveNext(); 
} 
Rs1->Filter = (long) adFilterNone; 
...... 
if (picRs) picRs->Release(); 
Rs1->Close(); 
pConn->Close();

只要字段的狀態是adFldOK，就能夠訪問。若是修改了字段，不要忘了先調用picRs的Update（注意不是Recordset的Update），而後才關閉，也不要忘了釋放picRs（即picRs->Release();）。

(4). 此時還能夠用IADORecordBinding接口添加新紀錄

if(FAILED(picRs->AddNew(&rs))) 
......

11. 訪問長數據

在Microsoft SQL中的長數據包括text、image等這樣長類型的數據，做爲二進制字節來對待。

能夠用Field對象的GetChunk和AppendChunk方法來訪問。每次能夠讀出或寫入所有數據的一部分，它會記住上次訪問的位置。可是若是中間訪問了別的字段後，就又得從頭來了。

請看下面的例子：

//寫入一張照片到數據庫： 
VARIANT varChunk; 
SAFEARRAY *psa; 
SAFEARRAYBOUND rgsabound[1];

//VT_ARRAY │ VT_UI1 
CFile f("h:\\aaa.jpg",Cfile::modeRead); 
BYTE bVal[ChunkSize+1]; 
UINT uIsRead=0; 
//Create a safe array to store the array of BYTES 
while(1) 
{ 
uIsRead=f.Read(bVal,ChunkSize); 
if(uIsRead==0)break; 
rgsabound[0].cElements =uIsRead; 
rgsabound[0].lLbound = 0; 
psa = SafeArrayCreate(VT_UI1,1,rgsabound); 
for(long index=0;index<uIsRead;index++) 
{ 
if(FAILED(SafeArrayPutElement(psa,&index,&bVal[index]))) 
::MessageBox(NULL,"啊，又出毛病了。","提示",MB_OK │ MB_ICONWARNING); 
} 
varChunk.vt = VT_ARRAY│VT_UI1; 
varChunk.parray = psa; 
try{ 
m_pRecordset->Fields->GetItem("photo")->AppendChunk(varChunk); 
} 
catch (_com_error &e) 
{ 
CString str=(char*)e.Description(); 
::MessageBox(NULL,str+"\n又出毛病了。","提示",MB_OK │ MB_ICONWARNING); 
} 
::VariantClear(&varChunk); 
::SafeArrayDestroyData( psa); 
if(uIsRead<ChunkSize)break; 
}//while(1) 
f.Close();

//從數據庫讀一張照片： 
CFile f; 
f.Open("h:\\bbb.jpg",Cfile::modeWrite│Cfile::modeCreate); 
long lPhotoSize = m_pRecordset->Fields->Item["photo"]->ActualSize; 
long lIsRead=0;

_variant_t varChunk; 
BYTE buf[ChunkSize]; 
while(lPhotoSize>0) 
{ 
lIsRead=lPhotoSize>=ChunkSize? ChunkSize:lPhotoSize; 
varChunk = m_pRecordset->Fields-> 
Item["photo"]->GetChunk(lIsRead); 
for(long index=0;index<lIsRead;index++) 
{ 
::SafeArrayGetElement(varChunk.parray,&index,buf+index); 
} 
f.Write(buf,lIsRead); 
lPhotoSize-=lIsRead; 
}//while() 
f.Close();

12. 使用SafeArray問題

學 會使用SafeArray也是很重要的，由於在ADO編程中常常要用。它的主要目的是用於automation中的數組型參數的傳遞。由於在網絡環境中， 數組是不能直接傳遞的，而必須將其包裝成SafeArray。實質上SafeArray就是將一般的數組增長一個描述符，說明其維數、長度、邊界、元素類 型等信息。SafeArray也並不單獨使用，而是將其再包裝到VARIANT類型的變量中，而後才做爲參數傳送出去。在VARIANT的vt成員的值如 果包含VT_ARRAY│...,那麼它所封裝的就是一個SafeArray，它的parray成員便是指向SafeArray的指針。 SafeArray中元素的類型能夠是VARIANT能封裝的任何類型，包括VARIANT類型自己。

使用SafeArray的具體步驟：

方法一：

包裝一個SafeArray：

(1). 定義變量，如：

VARIANT varChunk; 
SAFEARRAY *psa; 
SAFEARRAYBOUND rgsabound[1];

(2). 建立SafeArray描述符：

uIsRead=f.Read(bVal,ChunkSize);//read array from a file. 
if(uIsRead==0)break; 
rgsabound[0].cElements =uIsRead; 
rgsabound[0].lLbound = 0; 
psa = SafeArrayCreate(VT_UI1,1,rgsabound);

(3). 放置數據元素到SafeArray：

for(long index=0;index<uIsRead;index++) 
{ 
if(FAILED(SafeArrayPutElement(psa,&index,&bVal[index]))) 
::MessageBox(NULL,"出毛病了。","提示",MB_OK │ MB_ICONWARNING); 
}

一個一個地放，挺麻煩的。

(4). 封裝到VARIANT內：

varChunk.vt = VT_ARRAY│VT_UI1; 
varChunk.parray = psa;

這樣就能夠將varChunk做爲參數傳送出去了。

讀取SafeArray中的數據的步驟：

(1). 用SafeArrayGetElement一個一個地讀

BYTE buf[lIsRead]; 
for(long index=0;index<lIsRead;index++) 
{ 
::SafeArrayGetElement(varChunk.parray,&index,buf+index); 
}

就讀到緩衝區buf裏了。

方法二：

使用SafeArrayAccessData直接讀寫SafeArray的緩衝區：

(1). 讀緩衝區：

BYTE *buf; 
SafeArrayAccessData(varChunk.parray, (void **)&buf); 
f.Write(buf,lIsRead); 
SafeArrayUnaccessData(varChunk.parray);

(2). 寫緩衝區：

BYTE *buf; 
::SafeArrayAccessData(psa, (void **)&buf); 
for(long index=0;index<uIsRead;index++) 
{ 
buf[index]=bVal[index]; 
} 
::SafeArrayUnaccessData(psa);

varChunk.vt = VT_ARRAY│VT_UI1; 
varChunk.parray = psa;

這 種方法讀寫SafeArray均可以，它直接操縱SafeArray的數據緩衝區，比用SafeArrayGetElement和 SafeArrayPutElement速度快。特別適合於讀取數據。但用完以後不要忘了調 用::SafeArrayUnaccessData(psa)，不然會出錯的。

13. 使用書籤( bookmark )

書 籤能夠惟一標識記錄集中的一個記錄，用於快速地將當前記錄移回到已訪問過的記錄，以及進行過濾等等。Provider會自動爲記錄集中的每一條記錄產生一 個書籤，咱們只須要使用它就好了。咱們不能試圖顯示、修改或比較書籤。ADO用記錄集的Bookmark屬性表示當前記錄的書籤。

用法步驟：

(1). 創建一個VARIANT類型的變量

_variant_t VarBookmark;

(2). 將當前記錄的書籤值存入該變量

也就是記錄集的Bookmark屬性的當前值。

VarBookmark = rst->Bookmark;

(3). 返回到先前的記錄

將保存的書籤值設置到記錄集的書籤屬性中：

// Check for whether bookmark set for a record 
if (VarBookmark.vt == VT_EMPTY) 
printf("No Bookmark set!\n"); 
else 
rst->Bookmark = VarBookmark;

設置完後，當前記錄即會移動到該書籤指向的記錄。

1四、設置過濾條件

Recordset 對象的Filter屬性表示了當前的過濾條件。它的值能夠是以AND或OR鏈接起來的條件表達式（不含WHERE關鍵字）、由書籤組成的數組或ADO提供 的FilterGroupEnum枚舉值。爲Filter屬性設置新值後Recordset的當前記錄指針會自動移動到知足過濾條件的第一個記錄。例如：

rst->Filter = _bstr_t ("姓名='趙薇' AND 性別=’女’");

在使用條件表達式時應注意下列問題：

（1）、能夠用圓括號組成複雜的表達式

例如：

rst->Filter = _bstr_t ("(姓名='趙薇' AND 性別=’女’) OR AGE<25");

可是微軟不容許在括號內用OR，而後在括號外用AND，例如：

rst->Filter = _bstr_t ("(姓名='趙薇' OR 性別=’女’) AND AGE<25");

必須修改成：

rst->Filter = _bstr_t ("(姓名='趙薇' AND AGE<25) OR (性別=’女’ AND AGE<25)");

（2）、表達式中的比較運算符能夠是LIKE

LIKE後被比較的是一個含有通配符*的字符串，星號表示若干個任意的字符。

字符串的首部和尾部能夠同時帶星號*

rst->Filter = _bstr_t ("姓名 LIKE '*趙*' ");

也能夠只是尾部帶星號：

rst->Filter = _bstr_t ("姓名 LIKE '趙*' ");

Filter屬性值的類型是Variant，若是過濾條件是由書籤組成的數組，則需將該數組轉換爲SafeArray，而後再封裝到一個VARIANT或_variant_t型的變量中，再賦給Filter屬性。

1五、索引與排序

（1）、創建索引

當以某個字段爲關鍵字用Find方法查找時，爲了加快速度能夠以該字段爲關鍵字在記錄集內部臨時創建索引。只要將該字段的Optimize屬性設置爲true便可，例如：

pRst->Fields->GetItem("姓名")->Properties-> 
GetItem("Optimize")->PutValue("True"); 
pRst->Find("姓名 = '趙薇'",1,adSearchForward); 
...... 
pRst->Fields->GetItem("姓名")->Properties-> 
GetItem("Optimize")->PutValue("False"); 
pRst->Close();

說明：Optimize屬性是由Provider提供的屬性（在ADO中稱爲動態屬性），ADO自己沒有此屬性。

（2）、排序

要排序也很簡單，只要把要排序的關鍵字列表設置到Recordset對象的Sort屬性裏便可，例如：

pRstAuthors->CursorLocation = adUseClient; 
pRstAuthors->Open("SELECT * FROM mytable", 
_variant_t((IDispatch *) pConnection), 
adOpenStatic, adLockReadOnly, adCmdText); 
...... 
pRst->Sort = "姓名 DESC, 年齡 ASC";

關鍵字（即字段名）之間用逗號隔開，若是要以某關鍵字降序排序，則應在該關鍵字後加一空格，再加DESC（如上例）。升序時ASC加不加無所謂。本操做是利用索引進行的，並未進行物理排序，因此效率較高。 
但要注意，在打開記錄集以前必須將記錄集的CursorLocation屬性設置爲adUseClient，如上例所示。Sort屬性值在須要時隨時能夠修改。

1六、事務處理

ADO中的事務處理也很簡單，只需分別在適當的位置調用Connection對象的三個方法便可，這三個方法是：

（1）、在事務開始時調用

pCnn->BeginTrans();

（2）、在事務結束併成功時調用

pCnn->CommitTrans ();

（3）、在事務結束並失敗時調用

pCnn->RollbackTrans ();

在 使用事務處理時，應儘可能減少事務的範圍，即減少從事務開始到結束（提交或回滾）之間的時間間隔，以便提升系統效率。須要時也可在調用 BeginTrans()方法以前，先設置Connection對象的IsolationLevel屬性值，詳細內容參見MSDN中有關ADO的技術資 料。

3、使用ADO編程常見問題解答

如下均是針對MS SQL 7.0編程時所遇問題進行討論。

一、鏈接失敗可能緣由

Enterprise Managemer內，打開將服務器的屬性對話框，在Security選項卡中，有一個選項Authentication。

若是該選項是Windows NT only，則你的程序所用的鏈接字符串就必定要包含Trusted_Connection參數，而且其值必須爲yes，如：

"Provider=SQLOLEDB;Server=888;Trusted_Connection=yes" 
";Database=master;uid=lad;";

若是不按上述操做，程序運行時鏈接必然失敗。

若是Authentication選項是SQL Server and Windows NT，則你的程序所用的鏈接字符串能夠不包含Trusted_Connection參數，如：

"Provider=SQLOLEDB;Server=888;Database=master;uid=lad;pwd=111;";

由於ADO給該參數取的默認值就是no，因此能夠省略。我認爲仍是取默認值比較安全一些。

二、改變當前數據庫的方法

使用Tansct-SQL中的USE語句便可。

三、如何判斷一個數據庫是否存在

(1)、可打開master數據庫中一個叫作SCHEMATA的視圖，其內容列出了該服務器上全部的數據庫名稱。

(2) 、更簡便的方法是使用USE語句，成功了就存在；不成功，就不存在。例如：

try{ 
m_pConnect->Execute ( _bstr_t("USE INSURANCE_2002"),NULL, 
adCmdText│adExecuteNoRecords ); 
} 
catch (_com_error &e) 
{ 
blSuccess=FALSE; 
CString str="數據庫INSURANCE_2002不存在！\n"; 
str+=e.Description(); 
::MessageBox(NULL,str,"警告",MB_OK │ MB_ICONWARNING); 
}

四、判斷一個表是否存在

（1）、一樣判斷一個表是否存在，也能夠用是否成功地打開它來判斷，十分方便，例如：

try{ 
m_pRecordset->Open(_variant_t("mytable"), 
_variant_t((IDispatch *)m_pConnection,true), adOpenKeyset, 
adLockOptimistic, adCmdTable); 
} 
catch (_com_error &e) 
{ 
::MessageBox(NULL,"該表不存在。","提示",MB_OK │ MB_ICONWARNING); 
}

(2)、要否則能夠採用麻煩一點的辦法，就是在MS-SQL服務器上的每一個數據庫中都有一個名爲sysobjects的表，查看此表的內容即知指定的表是否在該數據庫中。

(3)、一樣，每一個數據庫中都有一個名爲TABLES的視圖(View)，查看此視圖的內容即知指定的表是否在該數據庫中。

五、類型轉換問題

（1）、類型VARIANT_BOOL

類型VARIANT_BOOL等價於short類型。The VARIANT_BOOL is equivalent to short. see it's definition below: 
typdef short VARIANT_BOOL

（2）、_com_ptr_t類的類型轉換

_ConnectionPtr能夠自動轉換成IDspatch*類型，這是由於_ConnectionPtr其實是_com_ptr_t類的一個實例，而這個類有此類型轉換函數。

同理，_RecordsetPtr和_CommandPtr也均可以這樣轉換。

（3）、_bstr_t和_variant_t類

在ADO編程時，_bstr_t和_variant_t這兩個類頗有用，省去了許多BSTR和VARIANT類型轉換的麻煩。

六、打開記錄集時的問題

在打開記錄集時，在調用Recordset的Open方法時，其最後一個參數裏必定不能包含adAsyncExecute，不然將由於是異步操做，在讀取數據時沒法讀到數據。

七、異常處理問題

對全部調用ADO的語句必定要用try和catch語句捕捉異常，不然在發生異常時，程序會異常退出。

八、使用SafeArray問題

在初學使用中，我曾遇到一個傷腦筋的問題，必定要注意：

在 定義了SAFEARRAY的指針後，若是打算重複使用屢次，則在中間能夠調用::SafeArrayDestroyData釋放數據，但決不能調 用::SafeArrayDestroyDescriptor，不然必然出錯，即便調用SafeArrayCreate也不行。例如：

SAFEARRAY *psa; 
...... 
//When the data are no longer to be used: 
::SafeArrayDestroyData( psa);

我分析在定義psa指針時，一個SAFEARRAY的實例（也就是SAFEARRAY描述符）也同時被自動創建了。可是隻要一調用::SafeArrayDestroyDescriptor，描述符就被銷燬了。

因此我認爲::SafeArrayDestroyDescriptor能夠根本就不調用，即便調用也必須在最後調用。

九、重複使用命令對象問題

一個命令對象若是要重複使用屢次（尤爲是帶參數的命令），則在第一次執行以前，應將它的Prepared屬性設置爲TRUE。這樣會使第一次執行減慢，但卻可使之後的執行所有加快。

十、綁定字符串型字段問題

若是要綁定的字段是字符串類型，則對應的字符數組的元素個數必定要比字段長度大2（好比m_szau_fname[22]，其綁定的字段au_fname的長度實際是20），不這樣綁定就會失敗。

十一、使用AppendChunk的問題

當 用AddNew方法剛剛向記錄集內添加一個新記錄以後，不能首先向一個長數據字段（image類型）寫入數據，必須先向其餘字段寫入過數據以後，才能調用 AppendChunk寫該字段，不然出錯。也就是說，AppendChunk不能緊接在AddNew以後。另外，寫入其餘字段後還必須緊接着調用 AppendChunk，而不能調用記錄集的Update方法後，才調用AppendChunk，不然調用AppendChunk時也會出錯。換句話說， 就是必須AppendChunk在前，Update在後。於是這個時候就不能使用帶參數的AddNew了，由於帶參數的AddNew會自動調用記錄集的 Update，因此AppendChunk就跑到Update的後面了，就只有出錯了！所以，這時應該用不帶參數的AddNew。

我推測這多是MS SQL 7.0的問題，在MS SQL 2000中則不存在這些問題，可是AppendChunk仍然不能在Update以後。

4、小結

一 般狀況下，Connection和Command的Execute用於執行不產生記錄集的命令，而Recordset的Open用於產生一個記錄集，固然 也不是絕對的。特別Command主要是用於執行參數化的命令，能夠直接由Command對象執行，也能夠將Command對象傳遞給Recordset 的Open。

本 文中的代碼片段均在VC++ 6.0、Windows NT 4.0 SP6和MS SQL 7.0中調試經過。相信您讀過以後，編寫簡單的數據庫程序應該沒有問題了。固然要編寫比較實用的、複雜一點的程序，還須要對OLE DB、ADO以及數據庫平臺再多瞭解一點，但願您繼續努力，必定會很快成功的！詳細參考資料請參見微軟MSDN July 2000光盤或MS SQL 7.0在線文檔資料（Books online）。文中不免有錯誤和不妥之處，敬請各位批評指正！

............................................................................................ 
ADO 數據庫鏈接-實例分析-VC 
文章出處：豆豆技術網   發佈時間：2005-12-27

    這些天一直在學習ADO 數據庫 鏈接，感受比較複雜，因此一邊學習，一邊使用，一邊作了一些筆記，下面的一些東西就是我總結的一些關於ADO數據庫鏈接方面的東西，由於是筆記，因此不一 定頗有序，貼出來的意思一方面是能夠給你們一個參考，一邊也有但願你們一塊兒來完善的意思，其中錯誤和不足之處固然但願你們能夠及時地通知我，在貼上來的時 候，我有一個想法，由於我在使用的過程當中，老是會趕上一些莫明其妙的錯誤，因此我想你們有可能也會趕上，因而，我給出了一個錯誤總結，固然這裏就須要你們 一塊兒來完善了，若是你們有什麼心得和看法，但願在評論中留言，我會及時地接受你們的意見並把他們加進來（固然是在獲得您的容許的狀況下）

一、導入庫文件

使用ADO前必須在工程的stdafx.h文件最後用直接引入符號＃import引入ADO庫文件，以使編譯器能正確編譯。代碼以下：

#import "C:Program Filescommon filessystemadomsado15.dll" no_namespace rename("EOF","EndOfFile") rename("BOF","FirstOfFile")

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的其餘 庫衝突。

二、初始化COM環境

（1）::CoInitialize(NULL); //初始化OLE/COM庫環境

:: CoUninitialize();//既然初始化了環境，固然就有必要釋放他了

（2）也能夠調用MFC全局函數

AfxOleInit();

三、三大對象的定義和建立實例

(1) _ConnectionPtr pConnection("ADODB.Connection");

_RecordsetPtr pRecordset("ADODB.Recordset");

_CommandPtr pCommand("ADODN.Command");

(2) _ConnectionPtr pConnection;

_RecordsetPtr pRecordset;

_CommandPtr pCommand;

pConnection.CreateInstance(__uuidof(Connection));

pRecordset.CreateInstance(__uuidof(Recordset));

pCommand.CreateInstance(__uuidof(Command));

(3) _ConnectionPtr pConnection;

_RecordsetPtr pRecordset;

_CommandPtr pCommand;

pConnection.CreateInstance("ADODB.Connection");

pRecordset.CreateInstance("ADODB.Recordset");

pCommand.CreateInstance("ADODB.Command");

四、打開一個鏈接

pConnection->Open(ConnectionString,"","",adModeUnknown);///鏈接數據庫

上面的鏈接字符串ConnectionString根據不一樣的數據源，分別對應不一樣的寫法

1）訪問Access 2000

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=databaseName;User ID=userName;Password=userPassWord"

2)訪問ODBC數據

" Provider=MADASQL;DSN=dsnName;UID=userName;PWD=userPassword;"

3)訪問Oracle數據庫

「Provider=MSDAORA;Data Sourse=serverName;User ID=userName;Password=userPassword;"

3)訪問MS SQL數據庫

"Provider=SQLOLEDB,Data Source=serverName;Initial Catalog=databaseName;User ID=userName;Password=userPassword;"

四、執行SQL命令

SQL命令比較多，可是不去考慮細節，這裏只說出通用的方法

CString strSQL;//定義SQL命令串，用來保存SQL語句

strSQL.Format("SQL statement");

而後在每一個要用到SQL命令串的方法中，使用strSQL.AllocSysString()的方法進行類型轉換

五、com的專用數據類型

variant ,bstr ,SafeArray

variant變量的範圍包括不少，使用_variant_t 進行管理

bstr是一種字符串變量，使用_bstr_t進行管理

六、關閉鏈接

if(m_pConnection->State)//不能屢次關閉，不然會出現錯誤

m_pConnection->Close();

七、結構化異常處理

ADO封裝了COM接口，因此須要進行錯誤處理

以下例：

HRESULT hr;

try

{

hr = m_pConnection.CreateInstance("ADODB.Connection");///建立Connection對象

if(SUCCEEDED(hr))

{

hr = m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb","","",adModeUnknown);///鏈接數據庫

///上面一句中鏈接字串中的Provider是針對ACCESS2000環境的，對於ACCESS97,須要改 爲:Provider=Microsoft.Jet.OLEDB.3.51; }

}

catch(_com_error e)///捕捉異常

{

CString errormessage;

errormessage.Format("鏈接數據庫失敗! 
錯誤信息:%s",e.ErrorMessage());

AfxMessageBox(errormessage);///顯示錯誤信息

}

八、錯誤緣由的分析

(1)不支持接口，多是不能插入空值