作者: 胡朝暉

    我們知道，在VB下進行基于ADO的編程相對比較簡單，只要我們通過reference加載了適當的類型庫以后，我們就可以正常的調用ADO對象，但是可能很多開發人員對于VC下的基于ADO，OLE DB的數據庫開發就沒有很多經驗了。所以我們有必要先討論一下VC下基于ADO開發的幾種模式。

　　VC下關于ADO的操作分析

　　一般來說，用VC++有三種方法可以實現對ADO的操作:

　　1． 通過#import方法

　　2． 通過利用MFC OLE的ClassWizard

　　3． 通過Windows API中COM相關的函數

在所有這三種方法種，#import是最方便的方法，它允許你產生一個類似VB的類結構。使你的開發變的很方便。

　　#import方法

　　在#import中，你需要提供所包含的類型庫的路徑和名稱，它能夠自動產生一個對GUIDs的定義，同時對自動生成對ADO對象的封裝。同時，能夠列舉它在類型庫中所能找到的類型，對任何你所引用的類型庫，VC++會在編譯的時候自動生成兩個文件:

　　一個頭文件（.tlh）,它包含了列舉的類型和對類型庫中對象的定義

　　一個實現文件（.tli）對類型庫對象模型中的方法產生封裝。

比如，你在stdafx.h文件中增加對msado15.dd的import以后，VC++會產生msado15.tlh和msado15.tli兩個文件。

　　#import也能夠使用一個新的類，_com_ptr_t,也被稱為智能指針。智能指針能夠自動執行QuyerInterface,AddRef和Release函數。對一個COM對象模型使用#import產生代碼和VBA很類似。

　　下面的代碼演示了如何使用#import在你的應用中實現對ADO的操作：

　　#import "c:\program files\common files\system\ado\msado15.dll" \

　　no_namespace

　　rename ( "EOF", "adoEOF" )

對EOF進行該名是必要的，因為典型的VC++應用都已經定義了EOF作為常數-1。

　　下面分析用#import定義和初始化ADO對象

　　通常來說，操作一個自動化對象需要兩個步驟：定義和初始化一個用來操作COM對象的變量。通過#import你可以在一行代碼完成這個工作，通過使用智能指針(_com_ptr_t)的構造函數傳遞一個有效的CLSID或者是PROGID。開發人員也可以通過_com_ptr_t::CreateInstance()方法來定義對象的一個示例。具體代碼如下所示：

　　_ConnectionPtr Conn1( __uuidof( Connection ) );

也可以采用下面的代碼實現同樣的功能

　　_ConnectionPtr Conn1 = NULL; file://定義對象

　　HRESULT hr = S_OK;

　　hr = Conn1.CreateInstance( __uuidof( Connection ) ); file://創建實例

推薦采用第二種方法，因為如果用第一種方法的話不能返回一個失敗的HRESULT,所以也就不能判斷ADO連接對象是成功還是失敗。注意這里的__uuidof( Connection)中的Connection是在.tlh文件中定義的。通過把它傳遞給方法CreateInstance,實際上就是創建了一個有效的ADOConnection對象。

　　需要注意到的是#import中有一個屬性為no_namespace,這是告訴編譯器該類不在一個單獨的名字空間中，使用no_namespace意味著你不需要在初始化變量的時候引用名字空間。當然如果在你的應用中需要倒入多個類型庫的話，最后不要使用no_namespace,以免引起名字沖突。

　　下面是簡單的基于ADO應用的代碼，采用了#import方法：

　　#include

　　#import rename("EOF", "adoEOF")

　　void main()

　　　{

　　　　HRESULT hr = S_OK;

　　　　file://因為沒有在#import中指定no_namespace,所以必須采用ADODB：：這樣的形式

　　　　file://來作為變量類型

　　　　ADODB::_RecordsetPtr Rs1 = NULL;

　　　　file://通過ODBC建立ADO連接

　　　　_bstr_t Connect( "DSN=AdoDemo;UID=sa;PWD=;" );

　　　　_bstr_t Source ( "SELECT * FROM Authors" );

　　　　CoInitialize();

　　　　file://初始化Rs1對象

　　　　hr = Rs1.CreateInstance( __uuidof( ADODB::Recordset ) );

　　　　file://對hr的返回正確性判斷省略

　　　　Rs1->Open( Source, Connect,

　　　　ADODB::adOpenForwardOnly,

　　　　ADODB::adLockReadOnly, -1 );

　　　　file://這里可以對記錄集Rs1進行操作

　　　　Rs1->Close();

　　　　Rs1 = NULL;

　　　　::MessageBox( NULL, "Success!", "", MB_OK );

　　　　CoUninitialize();

　　　}

    用MFC OLE創建ADO應用

　　MFC OLE類似于#import，能夠對一個類型庫產生一個封裝（wrapper）,但是不象#import,MFC OLE不能夠從類型庫中產生枚舉類型，但是它能夠更干凈的實現ADO。MFC類CString和COleVariant隱藏了BSTRS和Variants的細節。需要注意的是，有MFC OLE產生的類封裝都是繼承了類ColeDispatchDriver，由ADO產生的失敗的HRESULTS被封裝在類ColeDispatchException中。

　　首先我們需要說明一下用MFC OLE ClassWizard創建ADO應用的幾個不可缺少的步驟:

　　從Tools菜單中，選擇Options,然后選擇Directories tab，在Show Directories中，選擇Library Files，然后在directories增加路徑C:\program files\common files\system\ado，這樣做的目的是設置包含ADO類型庫的路徑。

　　從View菜單中，選擇ClassWizard,點擊Add Class按紐并選擇From A Type Library...，然后在Type Library dialog box對話框中，從C:\program files\common files\system\ado選擇文件msado15.dll,在Confirm Classes對話框中，選擇所有列出的類并按OK按紐，退出ClassWizard。實際上，ClassWizard為你生成了兩個文件msado15.h和msado15.cpp.

　　下面的代碼是實現ADO應用的自己編寫的代碼：

　　AfxOleInit(); file://初始化COM對象

　　...

　　_Recordset Rs1; file://定義數據集對象

　　COleException e;
　　COleVariant Connect( "DSN=AdoDemo;UID=sa;PWD=;" );

　　COleVariant Source ( "SELECT * FROM Authors" );

　　file://創建數據集對象

　　Rs1.CreateDispatch( "ADODB.Recordset.2.0", &e );

　　Rs1.Open( (VARIANT) Source, (VARIANT) Connect, 0, 1, -1 );

　　file://這里可以對結果集Rs1進行處理

　　Rs1.Close();

　　Rs1.ReleaseDispatch();

　　AfxMessageBox("Success!");

　　#import和MFC OLE都圍繞著一個給定的自動化對象產生了一個封裝類，它們分別繼承自_com_ptr_t和ColeDispatchDriver。但是事實上，你可以通過使用Windows API函數直接初始化ADO對象,下面討論直接用Win32 API函數來操作COM對象。
    用COM API創建ADO工程

　　為了直接使用ADO和COM對象，需要添加兩個頭文件adoid.h和adoint.h，這兩個頭文件定義了CLSIDs,接口定義和你操作ADO類型庫所需要的枚舉類型。同時你也需要增加頭文件INITGUID.H。

　　為了能夠編譯用COM API創建的ADO工程文件，你需要安裝OLE DB SDK或者是MSDASDK工具。下面是簡單的示例代碼：

　　#include

　　#include

　　#include "adoid.h" // ADO的GUID's

　　#include "adoint.h" // ADO的類、枚舉等等

　　void main()

　　{

　　　HRESULT hr = S_OK;

　　　ADORecordset* Rs1 = NULL; // ADORecordset 是在adoint.h中定義的

　　　VARIANT Source;

　　　VARIANT Connect;

　　　VariantInit( &Source );

　　　VariantInit( &Connect );

　　　Source.vt = VT_BSTR;

　　　Source.bstrVal = ::SysAllocString( L"SELECT * FROM Authors");

　　　Connect.vt = VT_BSTR;

　　　Connect.bstrVal = ::SysAllocString( L"DSN=AdoDemo;UID=sa;PWD=;" );

　　　hr = CoCreateInstance( CLSID_CADORecordset,

　　　NULL,

　　　CLSCTX_INPROC_SERVER,

　　　IID_IADORecordset,

　　　(LPVOID *) &Rs1 );

　　　if( SUCCEEDED( hr ) ) hr = Rs1->Open( Source,

　　　Connect,

　　　adOpenForwardOnly,

　　　adLockReadOnly,

　　　-1 );

　　　file://這里你可以對記錄集Rs1進行處理

　　　if( SUCCEEDED( hr ) ) hr = Rs1->Close();

　　　if( SUCCEEDED( hr ) ) { Rs1->Release(); Rs1 = NULL; }

　　　if( SUCCEEDED( hr ) ) ::MessageBox( NULL, "Success!", "", MB_OK );

　　}