• <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>
            posts - 131, comments - 12, trackbacks - 0, articles - 0
              C++博客 :: 首頁(yè) :: 新隨筆 :: 聯(lián)系 :: 聚合  :: 管理

            VC如何使用ADO

            Posted on 2013-02-18 08:50 盛勝 閱讀(10459) 評(píng)論(0)  編輯 收藏 引用

            VC用ADO訪問數(shù)據(jù)庫(kù)全攻略,介紹了VC用ADO來訪問數(shù)據(jù)庫(kù)的各個(gè)對(duì)象及各方法,很經(jīng)典,也很實(shí)用,很值得一看。 

            正文 
            一、ADO概述 
            ADO是Microsoft為最新和最強(qiáng)大的數(shù)據(jù)訪問范例 OLE DB 而設(shè)計(jì)的,是一個(gè)便于使用的應(yīng)用程序?qū)咏涌凇DO 使您能夠編寫應(yīng)用程序以通過 OLE. DB 提供者訪問和操作數(shù)據(jù)庫(kù)服務(wù)器中的數(shù)據(jù)。ADO 最主要的優(yōu)點(diǎn)是易于使用、速度快、內(nèi)存支出少和磁盤遺跡小。ADO 在關(guān)鍵的應(yīng)用方案中使用最少的網(wǎng)絡(luò)流量,并且在前端和數(shù)據(jù)源之間使用最少的層數(shù),所有這些都是為了提供輕量、高性能的接口。之所以稱為 ADO,是用了一個(gè)比較熟悉的暗喻,OLE 自動(dòng)化接口。

            OLE DB是一組”組件對(duì)象模型”(COM) 接口,是新的數(shù)據(jù)庫(kù)低層接口,它封裝了ODBC的功能,并以統(tǒng)一的方式訪問存儲(chǔ)在不同信息源中的數(shù)據(jù)。OLE DB是Microsoft UDA(Universal Data Access)策略的技術(shù)基礎(chǔ)。OLE DB 為任何數(shù)據(jù)源提供了高性能的訪問,這些數(shù)據(jù)源包括關(guān)系和非關(guān)系數(shù)據(jù)庫(kù)、電子郵件和文件系統(tǒng)、文本和圖形、自定義業(yè)務(wù)對(duì)象等等。也就是說,OLE DB 并不局限于 ISAM、Jet 甚至關(guān)系數(shù)據(jù)源,它能夠處理任何類型的數(shù)據(jù),而不考慮它們的格式和存儲(chǔ)方法。在實(shí)際應(yīng)用中,這種多樣性意味著可以訪問駐留在 Excel 電子數(shù)據(jù)表、文本文件、電子郵件/目錄服務(wù)甚至郵件服務(wù)器,諸如 Microsoft Exchange 中的數(shù)據(jù)。但是,OLE DB 應(yīng)用程序編程接口的目的是為各種應(yīng)用程序提供最佳的功能,它并不符合簡(jiǎn)單化的要求。您需要的API 應(yīng)該是一座連接應(yīng)用程序和OLE DB 的橋梁,這就是 ActiveX Data Objects (ADO)。

            二、在VC中使用ADO(開發(fā)步驟好下:)

            1、引入ADO庫(kù)文件

            使用ADO前必須在工程的stdafx.h頭文件里用直接引入符號(hào)#import引入ADO庫(kù)文件,以使編譯器能正確編譯。代碼如下所示:

            用#import引入ADO庫(kù)文件

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

            這行語(yǔ)句聲明在工程中使用ADO,但不使用ADO的名字空間,并且為了避免常數(shù)沖突,將常數(shù)EOF改名為adoEOF。現(xiàn)在不需添加另外的頭文件,就可以使用ADO接口了。

            2、初始化OLE/COM庫(kù)環(huán)境 
            必須注意的是,ADO庫(kù)是一組COM動(dòng)態(tài)庫(kù),這意味應(yīng)用程序在調(diào)用ADO前,必須初始化OLE/COM庫(kù)環(huán)境。在MFC應(yīng)用程序里,一個(gè)比較好的方法是在應(yīng)用程序主類的InitInstance成員函數(shù)里初始化OLE/COM庫(kù)環(huán)境。

            BOOL CMyAdoTestApp::InitInstance() 

            if(!AfxOleInit())//這就是初始化COM庫(kù) 

            AfxMessageBox(“OLE初始化出錯(cuò)!”); 
            return FALSE; 
            }

            ……

            }

            3、ADO接口簡(jiǎn)介

            ADO庫(kù)包含三個(gè)基本接口:_ConnectionPtr接口、_CommandPtr接口和_RecordsetPtr接口。 
            _ConnectionPtr接口返回一個(gè)記錄集或一個(gè)空指針。通常使用它來創(chuàng)建一個(gè)數(shù)據(jù)連接或執(zhí)行一條不返回任何結(jié)果的SQL語(yǔ)句,如一個(gè)存儲(chǔ)過程。使用_ConnectionPtr接口返回一個(gè)記錄集不是一個(gè)好的使用方法。對(duì)于要返回記錄的操作通常用_RecordserPtr來實(shí)現(xiàn)。而用_ConnectionPtr操作時(shí)要想得到記錄條數(shù)得遍歷所有記錄,而用_RecordserPtr時(shí)不需要。

            _CommandPtr接口返回一個(gè)記錄集。它提供了一種簡(jiǎn)單的方法來執(zhí)行返回記錄集的存儲(chǔ)過程和SQL語(yǔ)句。在使用_CommandPtr接口時(shí),你可以利用全局_ConnectionPtr接口,也可以在_CommandPtr接口里直接使用連接串。如果你只執(zhí)行一次或幾次數(shù)據(jù)訪問操作,后者是比較好的選擇。但如果你要頻繁訪問數(shù)據(jù)庫(kù),并要返回很多記錄集,那么,你應(yīng)該使用全局_ConnectionPtr接口創(chuàng)建一個(gè)數(shù)據(jù)連接,然后使用_CommandPtr接口執(zhí)行存儲(chǔ)過程和SQL語(yǔ)句。

            _RecordsetPtr是一個(gè)記錄集對(duì)象。與以上兩種對(duì)象相比,它對(duì)記錄集提供了更多的控制功能,如記錄鎖定,游標(biāo)控制等。同_CommandPtr接口一樣,它不一定要使用一個(gè)已經(jīng)創(chuàng)建的數(shù)據(jù)連接,可以用一個(gè)連接串代替連接指針賦給_RecordsetPtr的connection成員變量,讓它自己創(chuàng)建數(shù)據(jù)連接。如果你要使用多個(gè)記錄集,最好的方法是同Command對(duì)象一樣使用已經(jīng)創(chuàng)建了數(shù)據(jù)連接的全局_ConnectionPtr接口 
            ,然后使用_RecordsetPtr執(zhí)行存儲(chǔ)過程和SQL語(yǔ)句。

            4、使用_ConnectionPtr接口 
            _ConnectionPtr主要是一個(gè)連接接口,取得與數(shù)據(jù)庫(kù)的連接。它的連接字符串可以是自己直接寫,也可以指向一個(gè)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!");

            5、使用_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();

            6、使用_CommandPtr接口 
            _CommandPtr接口返回一個(gè)Recordset對(duì)象,并且提供了更多的記錄集控制功能,以下代碼示例了使用_CommandPtr接口的方法:

            代碼11:使用_CommandPtr接口獲取數(shù)據(jù) 
            _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);

            6、關(guān)于數(shù)據(jù)類型轉(zhuǎn)換由于COM對(duì)象是跨平臺(tái)的,它使用了一種通用的方法來處理各種類型的數(shù)據(jù), 
            因此Cstring 類和COM對(duì)象是不兼容的,我們需要一組API來轉(zhuǎn)換COM對(duì)象和C++類型的數(shù)據(jù)。_vatiant_t和_bstr_t就是這樣兩種對(duì)象。它們提供了通用的方法轉(zhuǎn)換COM對(duì)象和C++類型的數(shù)據(jù)。

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

            1. 生成應(yīng)用程序框架并初始化OLE/COM庫(kù)環(huán)境 
            創(chuàng)建一個(gè)標(biāo)準(zhǔn)的MFC AppWizard(exe)應(yīng)用程序,然后在使用ADO數(shù)據(jù)庫(kù)的InitInstance函數(shù)中初始化OLE/COM庫(kù)(因?yàn)锳DO庫(kù)是一個(gè)COM DLL庫(kù))。 
            本例為:

            BOOL CAdotestDlg::OnInitDialog() 

                    ::CoInitialize(NULL); //初始化OLE/COM庫(kù)環(huán)境 
              }

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

            另外:

            m_pRecordset->Close(); 注意!!!不要多次關(guān)閉!!!!!!!!!!!! 
            m_pConnection->Close(); 
            m_pRecordset = NULL; 
            m_pConnection = NULL; 
            2. 引入ADO庫(kù)文件

            使用ADO前必須在工程的stdafx.h文件最后用直接引入符號(hào)#import引入ADO庫(kù)文件,以使編譯器能正確編譯。代碼如下: 
            #import "C:\Program Files\common files\system\ado\msado15.dll" no_namespace rename("EOF","adoEOF")
            ADO類的定義是作為一種資源存儲(chǔ)在ADO DLL(msado15.dll)中,在其內(nèi)部稱為類型庫(kù)。類型庫(kù)描述了自治接口,以及C++使用的COM vtable接口。當(dāng)使用#import指令時(shí),在運(yùn)行時(shí)Visual C++需要從ADO DLL中讀取這個(gè)類型庫(kù),并以此創(chuàng)建一組C++頭文件。這些頭文件具有.tli 和.tlh擴(kuò)展名,讀者可以在項(xiàng)目的目錄下找到這兩個(gè)文件。在C++程序代碼中調(diào)用的ADO類要在這些文件中定義。 
              程序的第三行指示ADO對(duì)象不使用名稱空間。在有些應(yīng)用程序中,由于應(yīng)用程序中的對(duì)象與ADO中的對(duì)象之間可能會(huì)出現(xiàn)命名沖突,所以有必要使用名稱空間。如果要使用名稱空間,則可把第三行程序修改為: rename_namespace("AdoNS")。第四行代碼將ADO中的EOF(文件結(jié)束)更名為adoEOF,以避免與定義了自己的EOF的其他庫(kù)沖突。

            3.利用智能指針進(jìn)行數(shù)據(jù)庫(kù)操作

            在CaboutDlg頭文件中定義兩個(gè)ADO智能指針類實(shí)例,并在對(duì)話框中加入一個(gè)ListCtrl。

            class CAdotestDlg : public CDialog 

                 _ConnectionPtr m_pConnection; 
                 _RecordsetPtr m_pRecordset; 
            ClistCtrl m_List; 
                 ...... 
            }   

            ADO庫(kù)包含三個(gè)智能指針:_ConnectionPtr、_CommandPtr和_RecordsetPtr。

            _ConnectionPtr通常被用來創(chuàng)建一個(gè)數(shù)據(jù)連接或執(zhí)行一條不返回任何結(jié)果的SQL語(yǔ)句,如一個(gè)存儲(chǔ)過程。 
            _CommandPtr返回一個(gè)記錄集。它提供了一種簡(jiǎn)單的方法來執(zhí)行返回記錄集的存儲(chǔ)過程和SQL語(yǔ)句。在使用_CommandPtr接口時(shí),可以利用全局_ConnectionPtr接口,也可以在_CommandPtr接口里直接使用連接串。 _RecordsetPtr是一個(gè)記錄集對(duì)象。與以上兩種對(duì)象相比,它對(duì)記錄集提供了更多的控制功能,如記錄鎖定、游標(biāo)控制等。

            在使用ADO程序的事件響應(yīng)中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數(shù)據(jù)源 
              //注意:這是連接不需要用戶ID或密碼的open 函數(shù) 
              // 否則形式為 ->Open("DSN=test;uid=sa;pwd=123;","","",0); 
              // 執(zhí)行SQL語(yǔ)句得到一個(gè)記錄集把其指針賦值給m_pRecordset 
              CString strSql="select * from middle"; 
              BSTR bstrSQL = strSql.AllocSysString(); 
              m_pRecordset->Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText); 
              //adOpenDynamic:動(dòng)態(tài) adLockOptimistic樂觀封鎖法 adCmdText:文本查詢語(yǔ)句 
              while(!m_pRecordset->adoEOF)//遍歷所有記錄 
              { 
               //取紀(jì)錄字段值方式之一 
               _variant_t TheValue; //VARIANT數(shù)據(jù)類型 
               TheValue = m_pRecordset->GetCollect("BIG_NAME");//得到字段BIG_NAME的值 
               if(TheValue.vt!=VT_NULL) 
                m_List.AddString((char*)_bstr_t(TheValue)); 
               //將該值加入到列表控件中 
               //取紀(jì)錄字段值方式之二 
               // _bstr_t TheValue1=m_pRecordset->Fields->GetItem("BIG_NAME")->Value; 
               // CString temp=TheValue1.copy(); 
               // m_List.AddString(temp); 
               //數(shù)據(jù)類型轉(zhuǎn)換 
               _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();//轉(zhuǎn)到下一條紀(jì)錄 
              } 
              m_pRecordset->Close(); 
              m_pConnection->Close(); 

            catch (_com_error e)//異常處理 

              AfxMessageBox(e.ErrorMessage()); 

            m_pRecordset->Close(); //注意!!!不要多次關(guān)閉!!!!否則會(huì)出錯(cuò) 
            m_pConnection->Close(); 
            m_pRecordset = NULL; 
            m_pConnection = NULL; 
            }

            程序中通過_variant_t和_bstr_t轉(zhuǎn)換COM對(duì)象和C++類型的數(shù)據(jù), _variant_t類封裝了OLE自治VARIANT數(shù)據(jù)類型。在C++中使用_variant_t類要比直接使用VARIANT數(shù)據(jù)類型容易得多。

            好,編譯后該程序就能運(yùn)行了,但記住運(yùn)行前要?jiǎng)?chuàng)建一個(gè)叫ADOTest的ODBC數(shù)據(jù)源。該程序?qū)驯韒iddle中的BIG_NAME字段值顯示在列表控件中。

            在Visual C++中用ADO進(jìn)行數(shù)據(jù)庫(kù)編程(中) 
            4.執(zhí)行SQL命令并取得結(jié)果記錄集

                為了取得結(jié)果記錄集,我們定義一個(gè)指向Recordset對(duì)象的指針:_RecordsetPtr m_pRecordset; 
            并為其創(chuàng)建Recordset對(duì)象的實(shí)例: m_pRecordset.CreateInstance("ADODB.Recordset"); 
            SQL命令的執(zhí)行可以采用多種形式,下面我們一進(jìn)行闡述。

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

            Execute方法的原型如下所示:

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

                 其中CommandText是命令字串,通常是SQL命令。 
            參數(shù)RecordsAffected是操作完成后所影響的行數(shù), 
            參數(shù)Options表示CommandText中內(nèi)容的類型,Options可以取如下值之一: 
            adCmdText:表明CommandText是文本命令 
            adCmdTable:表明CommandText是一個(gè)表名 
            adCmdProc:表明CommandText是一個(gè)存儲(chǔ)過程 
            adCmdUnknown:未知

                Execute執(zhí)行完后返回一個(gè)指向記錄集的指針,下面我們給出具體代碼并作說明。 
                _variant_t RecordsAffected; 
                ///執(zhí)行SQL命令:CREATE TABLE創(chuàng)建表格users,users包含四個(gè)字段:整形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);

                ///執(zhí)行SQL統(tǒng)計(jì)命令得到包含記錄條數(shù)的記錄集 
                m_pRecordset =  m_pConnection->Execute("SELECT COUNT(*) FROM users",&RecordsAffected,adCmdText); 
                _variant_t vIndex = (long)0; 
                _variant_t vCount = m_pRecordset->GetCollect(vIndex);///取得第一個(gè)字段的值放入vCount變量 
                上兩句可以寫成— _variant_t vCount = m_pRecordset->GetCollect((_variant_t)((long)0)); 
                m_pRecordset->Close();///關(guān)閉記錄集 
                CString message; 
                message.Format("共有%d條記錄",vCount.lVal); 
                AfxMessageBox(message);///顯示當(dāng)前記錄條數(shù)

            (2)利用Command對(duì)象來執(zhí)行SQL命令

            _CommandPtr m_pCommand; 
            m_pCommand.CreateInstance("ADODB.Command"); 
            _variant_t vNULL; 
            vNULL.vt = VT_ERROR; 
            vNULL.scode = DISP_E_PARAMNOTFOUND;///定義為無(wú)參數(shù) 
            m_pCommand->ActiveConnection = m_pConnection;///非常關(guān)鍵的一句,將建立的連接賦值給它 
            m_pCommand->CommandText = "SELECT * FROM users";///命令字串 
            m_pRecordset = m_pCommand->Execute(&vNULL,&vNULL,adCmdText);///執(zhí)行命令,取得記錄集

            在這段代碼中我們只是用Command對(duì)象來執(zhí)行了SELECT查詢語(yǔ)句,Command對(duì)象在進(jìn)行存儲(chǔ)過程的調(diào)用中能真正體現(xiàn)它的作用。下次我們將詳細(xì)介紹。

            (3)直接用Recordset對(duì)象進(jìn)行查詢?nèi)〉糜涗浖?/p>

            實(shí)例——

            void CGmsaDlg::OnDBSelect() 

                // TODO: Add your control notification handler code here 
                 _RecordsetPtr Rs1;  //定義Recordset對(duì)象 
                _bstr_t Connect("DSN=GMS;UID=sa;PWD=;");//定義連接字符串 
                _bstr_t Source ("SELECT count(*) FROM buaa.mdb010");  //要執(zhí)行的SQL語(yǔ)句 
                ::CoInitialize(NULL);    //初始化Rs1對(duì)象 
                    HRESUL hr = Rs1.CreateInstance( __uuidof( Recordset ) ); 
                   //省略對(duì)返回值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是數(shù)據(jù)查詢字符串 
            ②ActiveConnection是已經(jīng)建立好的連接(我們需要用Connection對(duì)象指針來構(gòu)造一個(gè)_variant_t對(duì)象) 
            ③CursorType光標(biāo)類型,它可以是以下值之一,請(qǐng)看這個(gè)枚舉結(jié)構(gòu):

            enum CursorTypeEnum 

            adOpenUnspecified = -1,///不作特別指定 
            adOpenForwardOnly = 0,///前滾靜態(tài)光標(biāo)。這種光標(biāo)只能向前瀏覽記錄集,比如用MoveNext向前滾動(dòng),這種方式可以提高瀏覽速度。但諸如BookMark,RecordCount,AbsolutePosition,AbsolutePage都不能使用 
            adOpenKeyset = 1,///采用這種光標(biāo)的記錄集看不到其它用戶的新增、刪除操作,但對(duì)于更新原有記錄的操作對(duì)你是可見的。

            adOpenDynamic = 2,///動(dòng)態(tài)光標(biāo)。所有數(shù)據(jù)庫(kù)的操作都會(huì)立即在各用戶記錄集上反應(yīng)出來。 
            adOpenStatic = 3///靜態(tài)光標(biāo)。它為你的記錄集產(chǎn)生一個(gè)靜態(tài)備份,但其它用戶的新增、刪除、更新操作對(duì)你的記錄集來說是不可見的。 
            }; 
            ④LockType鎖定類型,它可以是以下值之一,請(qǐng)看如下枚舉結(jié)構(gòu):

            enum LockTypeEnum 

            adLockUnspecified = -1,///未指定 
            adLockReadOnly = 1,///只讀記錄集 
            adLockPessimistic = 2,悲觀鎖定方式。數(shù)據(jù)在更新時(shí)鎖定其它所有動(dòng)作,這是最安全的鎖定機(jī)制 
            adLockOptimistic = 3,樂觀鎖定方式。只有在你調(diào)用Update方法時(shí)才鎖定記錄。在此之前仍然可以做數(shù)據(jù)的更新、插入、刪除等動(dòng)作 
            adLockBatchOptimistic = 4,樂觀分批更新。編輯時(shí)記錄不會(huì)鎖定,更改、插入及刪除是在批處理模式下完成。 
            };

            ⑤Options可以取如下值之一: 
            adCmdText:表明CommandText是文本命令 
            adCmdTable:表明CommandText是一個(gè)表名 
            adCmdProc:表明CommandText是一個(gè)存儲(chǔ)過程 
            adCmdUnknown:未知

            10、邦定數(shù)據(jù)

            定義一個(gè)綁定類,將其成員變量綁定到一個(gè)指定的記錄集,以方便于訪問記錄集的字段值。

            (1). 從CADORecordBinding派生出一個(gè)類:

            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宏關(guān)聯(lián)起來。每個(gè)字段對(duì)應(yīng)于兩個(gè)變量,一個(gè)存放字段的值,另一個(gè)存放字段的狀態(tài)。字段用從1開始的序號(hào)表示,如1,2,3等等。

            特別要注意的是:如果要綁定的字段是字符串類型,則對(duì)應(yīng)的字符數(shù)組的元素個(gè)數(shù)一定要比字段長(zhǎng)度大2(比如m_szau_fname[22],其綁定的字段au_fname的長(zhǎng)度實(shí)際是20),不這樣綁定就會(huì)失敗。我分析多出的2可能是為了存放字符串結(jié)尾的空字符null和BSTR字符串開頭的一個(gè)字(表示BSTR的長(zhǎng)度)。這個(gè)問題對(duì)于初學(xué)者來說可能是一個(gè)意想不到的問題。

            CADORecordBinding類的定義在icrsint.h文件里,內(nèi)容是:

            class CADORecordBinding 

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

            BEGIN_ADO_BINDING宏的定義也在icrsint.h文件里,內(nèi)容是: 
            #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接口才能綁定,調(diào)用它的BindToRecordset方法就行了。

            (3). rs中的變量即是當(dāng)前記錄字段的值

            //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();

            只要字段的狀態(tài)是adFldOK,就可以訪問。如果修改了字段,不要忘了先調(diào)用picRs的Update(注意不是Recordset的Update),然后才關(guān)閉,也不要忘了釋放picRs(即picRs->Release();)。

            (4). 此時(shí)還可以用IADORecordBinding接口添加新紀(jì)錄

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

            11. 訪問長(zhǎng)數(shù)據(jù)

            在Microsoft SQL中的長(zhǎng)數(shù)據(jù)包括text、image等這樣長(zhǎng)類型的數(shù)據(jù),作為二進(jìn)制字節(jié)來對(duì)待。

            可以用Field對(duì)象的GetChunk和AppendChunk方法來訪問。每次可以讀出或?qū)懭肴繑?shù)據(jù)的一部分,它會(huì)記住上次訪問的位置。但是如果中間訪問了別的字段后,就又得從頭來了。

            請(qǐng)看下面的例子:

            //寫入一張照片到數(shù)據(jù)庫(kù): 
            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();

            //從數(shù)據(jù)庫(kù)讀一張照片: 
            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問題

            學(xué)會(huì)使用SafeArray也是很重要的,因?yàn)樵贏DO編程中經(jīng)常要用。它的主要目的是用于automation中的數(shù)組型參數(shù)的傳遞。因?yàn)樵诰W(wǎng)絡(luò)環(huán)境中,數(shù)組是不能直接傳遞的,而必須將其包裝成SafeArray。實(shí)質(zhì)上SafeArray就是將通常的數(shù)組增加一個(gè)描述符,說明其維數(shù)、長(zhǎng)度、邊界、元素類型等信息。SafeArray也并不單獨(dú)使用,而是將其再包裝到VARIANT類型的變量中,然后才作為參數(shù)傳送出去。在VARIANT的vt成員的值如果包含VT_ARRAY│...,那么它所封裝的就是一個(gè)SafeArray,它的parray成員即是指向SafeArray的指針。SafeArray中元素的類型可以是VARIANT能封裝的任何類型,包括VARIANT類型本身。

            使用SafeArray的具體步驟:

            方法一:

            包裝一個(gè)SafeArray:

            (1). 定義變量,如:

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

            (2). 創(chuàng)建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). 放置數(shù)據(jù)元素到SafeArray:

            for(long index=0;index<uIsRead;index++) 

            if(FAILED(SafeArrayPutElement(psa,&index,&bVal[index]))) 
            ::MessageBox(NULL,"出毛病了。","提示",MB_OK │ MB_ICONWARNING); 
            }

            一個(gè)一個(gè)地放,挺麻煩的。

            (4). 封裝到VARIANT內(nèi):

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

            這樣就可以將varChunk作為參數(shù)傳送出去了。

            讀取SafeArray中的數(shù)據(jù)的步驟:

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

            BYTE buf[lIsRead]; 
            for(long index=0;index<lIsRead;index++) 

            ::SafeArrayGetElement(varChunk.parray,&index,buf+index); 
            }

            就讀到緩沖區(qū)buf里了。

            方法二:

            使用SafeArrayAccessData直接讀寫SafeArray的緩沖區(qū):

            (1). 讀緩沖區(qū):

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

            (2). 寫緩沖區(qū):

            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的數(shù)據(jù)緩沖區(qū),比用SafeArrayGetElement和SafeArrayPutElement速度快。特別適合于讀取數(shù)據(jù)。但用完之后不要忘了調(diào)用::SafeArrayUnaccessData(psa),否則會(huì)出錯(cuò)的。

            13. 使用書簽( bookmark )

            書簽可以唯一標(biāo)識(shí)記錄集中的一個(gè)記錄,用于快速地將當(dāng)前記錄移回到已訪問過的記錄,以及進(jìn)行過濾等等。Provider會(huì)自動(dòng)為記錄集中的每一條記錄產(chǎn)生一個(gè)書簽,我們只需要使用它就行了。我們不能試圖顯示、修改或比較書簽。ADO用記錄集的Bookmark屬性表示當(dāng)前記錄的書簽。

            用法步驟:

            (1). 建立一個(gè)VARIANT類型的變量

            _variant_t VarBookmark;

            (2). 將當(dāng)前記錄的書簽值存入該變量

            也就是記錄集的Bookmark屬性的當(dāng)前值。

            VarBookmark = rst->Bookmark;

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

            將保存的書簽值設(shè)置到記錄集的書簽屬性中:

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

            設(shè)置完后,當(dāng)前記錄即會(huì)移動(dòng)到該書簽指向的記錄。

            14、設(shè)置過濾條件

            Recordset對(duì)象的Filter屬性表示了當(dāng)前的過濾條件。它的值可以是以AND或OR連接起來的條件表達(dá)式(不含WHERE關(guān)鍵字)、由書簽組成的數(shù)組或ADO提供的FilterGroupEnum枚舉值。為Filter屬性設(shè)置新值后Recordset的當(dāng)前記錄指針會(huì)自動(dòng)移動(dòng)到滿足過濾條件的第一個(gè)記錄。例如:

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

            在使用條件表達(dá)式時(shí)應(yīng)注意下列問題:

            (1)、可以用圓括號(hào)組成復(fù)雜的表達(dá)式

            例如:

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

            但是微軟不允許在括號(hào)內(nèi)用OR,然后在括號(hào)外用AND,例如:

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

            必須修改為:

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

            (2)、表達(dá)式中的比較運(yùn)算符可以是LIKE

            LIKE后被比較的是一個(gè)含有通配符*的字符串,星號(hào)表示若干個(gè)任意的字符。

            字符串的首部和尾部可以同時(shí)帶星號(hào)*

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

            也可以只是尾部帶星號(hào):

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

            Filter屬性值的類型是Variant,如果過濾條件是由書簽組成的數(shù)組,則需將該數(shù)組轉(zhuǎn)換為SafeArray,然后再封裝到一個(gè)VARIANT或_variant_t型的變量中,再賦給Filter屬性。

            15、索引與排序

            (1)、建立索引

            當(dāng)以某個(gè)字段為關(guān)鍵字用Find方法查找時(shí),為了加快速度可以以該字段為關(guān)鍵字在記錄集內(nèi)部臨時(shí)建立索引。只要將該字段的Optimize屬性設(shè)置為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中稱為動(dòng)態(tài)屬性),ADO本身沒有此屬性。

            (2)、排序

            要排序也很簡(jiǎn)單,只要把要排序的關(guān)鍵字列表設(shè)置到Recordset對(duì)象的Sort屬性里即可,例如:

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

            關(guān)鍵字(即字段名)之間用逗號(hào)隔開,如果要以某關(guān)鍵字降序排序,則應(yīng)在該關(guān)鍵字后加一空格,再加DESC(如上例)。升序時(shí)ASC加不加無(wú)所謂。本操作是利用索引進(jìn)行的,并未進(jìn)行物理排序,所以效率較高。 
            但要注意,在打開記錄集之前必須將記錄集的CursorLocation屬性設(shè)置為adUseClient,如上例所示。Sort屬性值在需要時(shí)隨時(shí)可以修改。

            16、事務(wù)處理

            ADO中的事務(wù)處理也很簡(jiǎn)單,只需分別在適當(dāng)?shù)奈恢谜{(diào)用Connection對(duì)象的三個(gè)方法即可,這三個(gè)方法是:

            (1)、在事務(wù)開始時(shí)調(diào)用

            pCnn->BeginTrans();

            (2)、在事務(wù)結(jié)束并成功時(shí)調(diào)用

            pCnn->CommitTrans ();

            (3)、在事務(wù)結(jié)束并失敗時(shí)調(diào)用

            pCnn->RollbackTrans ();

            在使用事務(wù)處理時(shí),應(yīng)盡量減小事務(wù)的范圍,即減小從事務(wù)開始到結(jié)束(提交或回滾)之間的時(shí)間間隔,以便提高系統(tǒng)效率。需要時(shí)也可在調(diào)用BeginTrans()方法之前,先設(shè)置Connection對(duì)象的IsolationLevel屬性值,詳細(xì)內(nèi)容參見MSDN中有關(guān)ADO的技術(shù)資料。

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

            以下均是針對(duì)MS SQL 7.0編程時(shí)所遇問題進(jìn)行討論。

            1、連接失敗可能原因

            Enterprise Managemer內(nèi),打開將服務(wù)器的屬性對(duì)話框,在Security選項(xiàng)卡中,有一個(gè)選項(xiàng)Authentication。

            如果該選項(xiàng)是Windows NT only,則你的程序所用的連接字符串就一定要包含Trusted_Connection參數(shù),并且其值必須為yes,如:

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

            如果不按上述操作,程序運(yùn)行時(shí)連接必然失敗。

            如果Authentication選項(xiàng)是SQL Server and Windows NT,則你的程序所用的連接字符串可以不包含Trusted_Connection參數(shù),如:

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

            因?yàn)锳DO給該參數(shù)取的默認(rèn)值就是no,所以可以省略。我認(rèn)為還是取默認(rèn)值比較安全一些。

            2、改變當(dāng)前數(shù)據(jù)庫(kù)的方法

            使用Tansct-SQL中的USE語(yǔ)句即可。

            3、如何判斷一個(gè)數(shù)據(jù)庫(kù)是否存在

            (1)、可打開master數(shù)據(jù)庫(kù)中一個(gè)叫做SCHEMATA的視圖,其內(nèi)容列出了該服務(wù)器上所有的數(shù)據(jù)庫(kù)名稱。

            (2) 、更簡(jiǎn)便的方法是使用USE語(yǔ)句,成功了就存在;不成功,就不存在。例如:

            try{ 
            m_pConnect->Execute ( _bstr_t("USE INSURANCE_2002"),NULL, 
            adCmdText│adExecuteNoRecords ); 

            catch (_com_error &e) 

            blSuccess=FALSE; 
            CString str="數(shù)據(jù)庫(kù)INSURANCE_2002不存在!\n"; 
            str+=e.Description(); 
            ::MessageBox(NULL,str,"警告",MB_OK │ MB_ICONWARNING); 
            }

            4、判斷一個(gè)表是否存在

            (1)、同樣判斷一個(gè)表是否存在,也可以用是否成功地打開它來判斷,十分方便,例如:

            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)、要不然可以采用麻煩一點(diǎn)的辦法,就是在MS-SQL服務(wù)器上的每個(gè)數(shù)據(jù)庫(kù)中都有一個(gè)名為sysobjects的表,查看此表的內(nèi)容即知指定的表是否在該數(shù)據(jù)庫(kù)中。

            (3)、同樣,每個(gè)數(shù)據(jù)庫(kù)中都有一個(gè)名為TABLES的視圖(View),查看此視圖的內(nèi)容即知指定的表是否在該數(shù)據(jù)庫(kù)中。

            5、類型轉(zhuǎn)換問題

            (1)、類型VARIANT_BOOL

            類型VARIANT_BOOL等價(jià)于short類型。The VARIANT_BOOL is equivalent to short. see it's definition below: 
            typdef short VARIANT_BOOL

            (2)、_com_ptr_t類的類型轉(zhuǎn)換

            _ConnectionPtr可以自動(dòng)轉(zhuǎn)換成IDspatch*類型,這是因?yàn)開ConnectionPtr實(shí)際上是_com_ptr_t類的一個(gè)實(shí)例,而這個(gè)類有此類型轉(zhuǎn)換函數(shù)。

            同理,_RecordsetPtr和_CommandPtr也都可以這樣轉(zhuǎn)換。

            (3)、_bstr_t和_variant_t類

            在ADO編程時(shí),_bstr_t和_variant_t這兩個(gè)類很有用,省去了許多BSTR和VARIANT類型轉(zhuǎn)換的麻煩。

            6、打開記錄集時(shí)的問題

            在打開記錄集時(shí),在調(diào)用Recordset的Open方法時(shí),其最后一個(gè)參數(shù)里一定不能包含adAsyncExecute,否則將因?yàn)槭钱惒讲僮鳎谧x取數(shù)據(jù)時(shí)無(wú)法讀到數(shù)據(jù)。

            7、異常處理問題

            對(duì)所有調(diào)用ADO的語(yǔ)句一定要用try和catch語(yǔ)句捕捉異常,否則在發(fā)生異常時(shí),程序會(huì)異常退出。

            8、使用SafeArray問題

            在初學(xué)使用中,我曾遇到一個(gè)傷腦筋的問題,一定要注意:

            在定義了SAFEARRAY的指針后,如果打算重復(fù)使用多次,則在中間可以調(diào)用::SafeArrayDestroyData釋放數(shù)據(jù),但決不能調(diào)用::SafeArrayDestroyDescriptor,否則必然出錯(cuò),即使調(diào)用SafeArrayCreate也不行。例如:

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

            我分析在定義psa指針時(shí),一個(gè)SAFEARRAY的實(shí)例(也就是SAFEARRAY描述符)也同時(shí)被自動(dòng)建立了。但是只要一調(diào)用::SafeArrayDestroyDescriptor,描述符就被銷毀了。

            所以我認(rèn)為::SafeArrayDestroyDescriptor可以根本就不調(diào)用,即使調(diào)用也必須在最后調(diào)用。

            9、重復(fù)使用命令對(duì)象問題

            一個(gè)命令對(duì)象如果要重復(fù)使用多次(尤其是帶參數(shù)的命令),則在第一次執(zhí)行之前,應(yīng)將它的Prepared屬性設(shè)置為TRUE。這樣會(huì)使第一次執(zhí)行減慢,但卻可以使以后的執(zhí)行全部加快。

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

            如果要綁定的字段是字符串類型,則對(duì)應(yīng)的字符數(shù)組的元素個(gè)數(shù)一定要比字段長(zhǎng)度大2(比如m_szau_fname[22],其綁定的字段au_fname的長(zhǎng)度實(shí)際是20),不這樣綁定就會(huì)失敗。

            11、使用AppendChunk的問題

            當(dāng)用AddNew方法剛剛向記錄集內(nèi)添加一個(gè)新記錄之后,不能首先向一個(gè)長(zhǎng)數(shù)據(jù)字段(image類型)寫入數(shù)據(jù),必須先向其他字段寫入過數(shù)據(jù)之后,才能調(diào)用AppendChunk寫該字段,否則出錯(cuò)。也就是說,AppendChunk不能緊接在AddNew之后。另外,寫入其他字段后還必須緊接著調(diào)用AppendChunk,而不能調(diào)用記錄集的Update方法后,才調(diào)用AppendChunk,否則調(diào)用AppendChunk時(shí)也會(huì)出錯(cuò)。換句話說,就是必須AppendChunk在前,Update在后。因而這個(gè)時(shí)候就不能使用帶參數(shù)的AddNew了,因?yàn)閹?shù)的AddNew會(huì)自動(dòng)調(diào)用記錄集的Update,所以AppendChunk就跑到Update的后面了,就只有出錯(cuò)了!因此,這時(shí)應(yīng)該用不帶參數(shù)的AddNew。

            我推測(cè)這可能是MS SQL 7.0的問題,在MS SQL 2000中則不存在這些問題,但是AppendChunk仍然不能在Update之后。

            四、小結(jié)

            一般情況下,Connection和Command的Execute用于執(zhí)行不產(chǎn)生記錄集的命令,而Recordset的Open用于產(chǎn)生一個(gè)記錄集,當(dāng)然也不是絕對(duì)的。特別Command主要是用于執(zhí)行參數(shù)化的命令,可以直接由Command對(duì)象執(zhí)行,也可以將Command對(duì)象傳遞給Recordset的Open。

            本文中的代碼片斷均在VC++ 6.0、Windows NT 4.0 SP6和MS SQL 7.0中調(diào)試通過。相信您讀過之后,編寫簡(jiǎn)單的數(shù)據(jù)庫(kù)程序應(yīng)該沒有問題了。當(dāng)然要編寫比較實(shí)用的、復(fù)雜一點(diǎn)的程序,還需要對(duì)OLE DB、ADO以及數(shù)據(jù)庫(kù)平臺(tái)再多了解一點(diǎn),希望您繼續(xù)努力,一定會(huì)很快成功的!詳細(xì)參考資料請(qǐng)參見微軟MSDN July 2000光盤或MS SQL 7.0在線文檔資料(Books online)。文中難免有錯(cuò)誤和不妥之處,敬請(qǐng)各位批評(píng)指正!

            ............................................................................................ 
            ADO 數(shù)據(jù)庫(kù)連接-實(shí)例分析-VC 
            文章出處:豆豆技術(shù)網(wǎng)   發(fā)布時(shí)間:2005-12-27

                這些天一直在學(xué)習(xí)ADO 數(shù)據(jù)庫(kù) 連接,感覺比較復(fù)雜,所以一邊學(xué)習(xí),一邊使用,一邊做了一些筆記,下面的一些東西就是我總結(jié)的一些關(guān)于ADO數(shù)據(jù)庫(kù)連接方面的東西,因?yàn)槭枪P記,所以不一定很有序,貼出來的意思一方面是可以給大家一個(gè)參考,一邊也有希望大家一起來完善的意思,其中錯(cuò)誤和不足之處當(dāng)然希望大家可以及時(shí)地通知我,在貼上來的時(shí)候,我有一個(gè)想法,因?yàn)槲以谑褂玫倪^程中,總是會(huì)遇上一些莫明其妙的錯(cuò)誤,所以我想大家有可能也會(huì)遇上,于是,我給出了一個(gè)錯(cuò)誤總結(jié),當(dāng)然這里就需要大家一起來完善了,如果大家有什么心得和見解,希望在評(píng)論中留言,我會(huì)及時(shí)地接受大家的意見并把他們加進(jìn)來(當(dāng)然是在得到您的允許的情況下)

            1、導(dǎo)入庫(kù)文件

            使用ADO前必須在工程的stdafx.h文件最后用直接引入符號(hào)#import引入ADO庫(kù)文件,以使編譯器能正確編譯。代碼如下:

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

            ADO類的定義是作為一種資源存儲(chǔ)在ADO DLL(msado15.dll)中,在其內(nèi)部稱為類型庫(kù)。類型庫(kù)描述了自治接口,以及C++使用的COM vtable接口。當(dāng)使用#import指令時(shí),在運(yùn)行時(shí)Visual C++需要從ADO DLL中讀取這個(gè)類型庫(kù),并以此創(chuàng)建一組C++頭文件。這些頭文件具有.tli 和.tlh擴(kuò)展名,讀者可以在項(xiàng)目的目錄下找到這兩個(gè)文件。在C++程序代碼中調(diào)用的ADO類要在這些文件中定義。

            程序的第三行指示ADO對(duì)象不使用名稱空間。在有些應(yīng)用程序中,由于應(yīng)用程序中的對(duì)象與ADO中的對(duì)象之間可能會(huì)出現(xiàn)命名沖突,所以有必要使用名稱空間。如果要使用名稱空間,則可把第三行程序修改為: rename_namespace("AdoNS")。第四行代碼將ADO中的EOF(文件結(jié)束)更名為adoEOF,以避免與定義了自己的EOF的其他庫(kù)沖突。

            2、初始化COM環(huán)境

            (1)::CoInitialize(NULL); //初始化OLE/COM庫(kù)環(huán)境

            :: CoUninitialize();//既然初始化了環(huán)境,當(dāng)然就有必要釋放他了

            (2)也可以調(diào)用MFC全局函數(shù)

            AfxOleInit();

            3、三大對(duì)象的定義和創(chuàng)建實(shí)例

            (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");

            4、打開一個(gè)連接

            pConnection->Open(ConnectionString,"","",adModeUnknown);///連接數(shù)據(jù)庫(kù)

            上面的連接字符串ConnectionString根據(jù)不同的數(shù)據(jù)源,分別對(duì)應(yīng)不同的寫法

            1)訪問Access 2000

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

            2)訪問ODBC數(shù)據(jù)

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

            3)訪問Oracle數(shù)據(jù)庫(kù)

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

            3)訪問MS SQL數(shù)據(jù)庫(kù)

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

            4、執(zhí)行SQL命令

            SQL命令比較多,但是不去考慮細(xì)節(jié),這里只說出通用的方法

            CString strSQL;//定義SQL命令串,用來保存SQL語(yǔ)句

            strSQL.Format("SQL statement");

            然后在每個(gè)要用到SQL命令串的方法中,使用strSQL.AllocSysString()的方法進(jìn)行類型轉(zhuǎn)換

            5、com的專用數(shù)據(jù)類型

            variant ,bstr ,SafeArray

            variant變量的范圍包括很多,使用_variant_t 進(jìn)行管理

            bstr是一種字符串變量,使用_bstr_t進(jìn)行管理

            6、關(guān)閉連接

            if(m_pConnection->State)//不能多次關(guān)閉,否則會(huì)出現(xiàn)錯(cuò)誤

            m_pConnection->Close();

            7、結(jié)構(gòu)化異常處理

            ADO封裝了COM接口,所以需要進(jìn)行錯(cuò)誤處理

            如下例:

            HRESULT hr;

            try

            {

            hr = m_pConnection.CreateInstance("ADODB.Connection");///創(chuàng)建Connection對(duì)象

            if(SUCCEEDED(hr))

            {

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

            ///上面一句中連接字串中的Provider是針對(duì)ACCESS2000環(huán)境的,對(duì)于ACCESS97,需要改 為:Provider=Microsoft.Jet.OLEDB.3.51; }

            }

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

            {

            CString errormessage;

            errormessage.Format("連接數(shù)據(jù)庫(kù)失敗! 
            錯(cuò)誤信息:%s",e.ErrorMessage());

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

            }

            8、錯(cuò)誤原因的分析

            (1)不支持接口,可能是不能插入空值



             

            李安東  

             
            ADO數(shù)據(jù)庫(kù)編程入門

             
            文檔簡(jiǎn)介:
              本文簡(jiǎn)要介紹了在VC++ 6.0中使用 ADO進(jìn)行客戶端數(shù)據(jù)庫(kù)編程的基本步驟,以及常見問題的解決方法,可供入門級(jí)的參考之用。

            關(guān)鍵字: ADO VC++ 數(shù)據(jù)庫(kù)編程

            目錄:
              在VC++中使用ADO編程
              使用#import方法的編程步驟
              使用ADO編程常見問題解答
              小結(jié)

            文檔內(nèi)容:

              ADO是目前在Windows環(huán)境中比較流行的客戶端數(shù)據(jù)庫(kù)編程技術(shù)。ADO是建立在OLE DB底層技術(shù)之上的高級(jí)編程接口,因而它兼具有強(qiáng)大的數(shù)據(jù)處理功能(處理各種不同類型的數(shù)據(jù)源、分布式的數(shù)據(jù)處理等等)和極其簡(jiǎn)單、易用的編程接口,因而得到了廣泛的應(yīng)用。而且按微軟公司的意圖,OLE DB和ADO將逐步取代 ODBC和DAO。現(xiàn)在介紹ADO各種應(yīng)用的文章和書籍有很多,本文著重站在初學(xué)者的角度,簡(jiǎn)要探討一下在VC++中使用ADO編程時(shí)的一些問題。我們希望閱讀本文之前,您對(duì)ADO技術(shù)的基本原理有一些了解。

            一、在VC++中使用ADO編程
              ADO實(shí)際上就是由一組Automation對(duì)象構(gòu)成的組件,因此可以象使用其它任何Automation對(duì)象一樣使用ADO。ADO中最重要的對(duì)象有三個(gè):Connection、Command和Recordset,它們分別表示連接對(duì)象、命令對(duì)象和記錄集對(duì)象。如果您熟悉使用MFC中的ODBC類(CDatabase、CRecordset)編程,那么學(xué)習(xí)ADO編程就十分容易了。
            使用ADO編程時(shí)可以采用以下三種方法之一:

            1、使用預(yù)處理指令#import
            #import "C:\Program Files\Common Files\System\ADO\msado15.dll" \
            no_namespace rename("EOF", "EndOfFile")
            但要注意不能放在stdAfx.h文件的開頭,而應(yīng)該放在所有include指令的后面。否則在編譯時(shí)會(huì)出錯(cuò)。
            程序在編譯過程中,VC++會(huì)讀出msado15.dll中的類型庫(kù)信息,自動(dòng)產(chǎn)生兩個(gè)該類型庫(kù)的頭文件和實(shí)現(xiàn)文件msado15.tlh和msado15.tli(在您的Debug或Release目錄下)。在這兩個(gè)文件里定義了ADO的所有對(duì)象和方法,以及一些枚舉型的常量等。我們的程序只要直接調(diào)用這些方法就行了,與使用MFC中的COleDispatchDriver類調(diào)用Automation對(duì)象十分類似。

            2、使用MFC中的CIDispatchDriver
            就是通過讀取msado15.dll中的類型庫(kù)信息,建立一個(gè)COleDispatchDriver類的派生類,然后通過它調(diào)用ADO對(duì)象。

            3、直接用COM提供的API
             如使用如下代碼:

            CLSID clsid;
            HRESULT hr = ::CLSIDFromProgID(L"ADODB.Connection", &clsid);
            if(FAILED(hr))
            {...}
            ::CoCreateInstance(clsid, NULL, CLSCTX_SERVER, IID_IDispatch, (void **)&pDispatch);
            if(FAILED(hr))
            {...}

            以上三種方法,第一和第二種類似,可能第一種好用一些,第三種編程可能最麻煩。但可能第三種方法也是效率最高的,程序的尺寸也最小,并且對(duì)ADO的控制能力也最強(qiáng)。
            據(jù)微軟資料介紹,第一種方法不支持方法調(diào)用中的默認(rèn)參數(shù),當(dāng)然第二種方法也是這樣,但第三種就不是這樣了。采用第三種方法的水平也最高。當(dāng)你需要繞過ADO而直接調(diào)用OLE DB底層的方法時(shí),就一定要使用第三種方法了。
            ADO編程的關(guān)鍵,就是熟練地運(yùn)用ADO提供的各種對(duì)象(object)、方法(method)、屬性(property)和容器(collection)。另外,如果是在MS SQL或Oracle等大型數(shù)據(jù)庫(kù)上編程,還要能熟練使用SQL語(yǔ)言。

            二、使用#import方法的編程步驟
            這里建議您使用#import的方法,因?yàn)樗讓W(xué)、易用,代碼也比較簡(jiǎn)潔。

            1、 添加#import指令
            打開stdafx.h文件,將下列內(nèi)容添加到所有的include指令之后:
            #include <icrsint.h> //Include support for VC++ Extensions
            #import "C:\Program Files\Common Files\System\ADO\msado15.dll" \
            no_namespace rename("EOF", "adoEOF")
            其中icrsint.h文件包含了VC++擴(kuò)展的一些預(yù)處理指令、宏等的定義,用于COM編程時(shí)使用。

            2、定義_ConnectionPtr型變量,并建立數(shù)據(jù)庫(kù)連接
            建立了與數(shù)據(jù)庫(kù)服務(wù)器的連接后,才能進(jìn)行其他有關(guān)數(shù)據(jù)庫(kù)的訪問和操作。ADO使用Connection對(duì)象來建立與數(shù)據(jù)庫(kù)服務(wù)器的連接,所以它相當(dāng)于MFC中的CDatabase類。和CDatabase類一樣,調(diào)用Connection對(duì)象的Open方法即可建立與服務(wù)器的連接。
            數(shù)據(jù)類型 _ConnectionPtr實(shí)際上就是由類模板_com_ptr_t而得到的一個(gè)具體的實(shí)例類,其定義可以到msado15.tlh、comdef.h 和comip.h這三個(gè)文件中找到。在msado15.tlh中有:

            _COM_SMARTPTR_TYPEDEF(_Collection, __uuidof(_Collection));

            經(jīng)宏擴(kuò)展后就得到了_ConnectionPtr類。_ConnectionPtr類封裝了Connection對(duì)象的Idispatch接口指針,及一些必要的操作。我們就是通過這個(gè)指針來操縱Connection對(duì)象。類似地,后面用到的_CommandPtr和_RecordsetPtr類型也是這樣得到的,它們分別表示命令對(duì)象指針和記錄集對(duì)象的指針。

            (1)、連接到MS SQL Server
            注意連接字符串的格式,提供正確的連接字符串是成功連接到數(shù)據(jù)庫(kù)服務(wù)器的第一步,有關(guān)連接字符串的詳細(xì)信息參見微軟MSDN Library光盤。
            本例連接字符串中的server_name,database_name,user_name和password在編程時(shí)都應(yīng)該替換成實(shí)際的內(nèi)容。

            _ConnectionPtr pMyConnect=NULL;

            HRESULT hr = pMyConnect.CreateInstance(__uuidof(Connection)));

            if( FAILED(hr) )
                return;

            _bstr_t strConnect="Provider=SQLOLEDB; Server=server_name;"
             "Database=database_name; uid=user_name; pwd=password;"; 

            //connecting to the database server now:
            try{pMyConnect->Open(strConnect,"","",NULL);}

            catch (_com_error &e)
            {
                ::MessageBox(NULL,e.Description(),"警告",MB_OK | MB_ICONWARNING);
            }

            注意Connection對(duì)象的Open方法中的連接字符串參數(shù)必須是BSTR或_bstr_t類型。另外,本例是直接通過OLE DB Provider建立連接,所以無(wú)需建立數(shù)據(jù)源。

            (2)、通過ODBC Driver連接到Database Server
            連接字符串格式與直接用ODBC編程時(shí)的差不多:

            _bstr_t strConnect="DSN=datasource_name; Database=database_name; uid=user_name; pwd=password;";

            此時(shí)與ODBC編程一樣,必須先建立數(shù)據(jù)源。

            3、定義_RecordsetPtr型變量,并打開數(shù)據(jù)集
            定義_RecordsetPtr型變量,然后通過它調(diào)用Recordset對(duì)象的Open方法,即可打開一個(gè)數(shù)據(jù)集。所以Recordset對(duì)象與MFC中的CRecordset類類似,它也有當(dāng)前記錄、當(dāng)前記錄指針的概念。如:

            _RecordsetPtr m_pRecordset;
            if(!FAILED(m_pRecordset.CreateInstance( __uuidof( Recordset )))
            {
                m_pDoc->m_initialized=FALSE;
                return;
            }

            try
            {
                m_pRecordset->Open(_variant_t("mytable"), _variant_t((IDispatch *)pMyConnect,true), adOpenKeyset, adLockOptimistic, adCmdTable);
            }
            catch (_com_error &e)
            {
                ::MessageBox(NULL,"無(wú)法打開mytable表。","提示", MB_OK | MB_ICONWARNING);
            }

            Recordset對(duì)象的Open方法非常重要,它的第一個(gè)參數(shù)可以是一個(gè)SQL語(yǔ)句、一個(gè)表的名字或一個(gè)命令對(duì)象等等;第二個(gè)參數(shù)就是前面建立的連接對(duì)象的指針。此外,用Connection和Command對(duì)象的Execute方法也能得到記錄集,但是只讀的。

            4、讀取當(dāng)前記錄的數(shù)據(jù)
            我認(rèn)為讀取數(shù)據(jù)的最方便的方法如下:

            try
            {
                m_pRecordset->MoveFirst();  
                while(m_pRecordset->adoEOF==VARIANT_FALSE) 
                {
                    //Retrieve column's value: 
                    CString sName=(char*)(_bstr_t)(m_pRecordset->Fields->GetItem(_variant_t("name"))->Value);
                    short cAge=(short)(m_pRecordset->Fields->GetItem(_variant_t("age"))->Value);
                    //Do something what you want to do:
                    ......
                    m_pRecordset->MoveNext();   
                }
            }//try
            catch (_com_error &e)
            {
                CString str=(char*)e.Description();
                ::MessageBox(NULL,str+"\n又出毛病了。","提示", MB_OK | MB_ICONWARNING);
            }

            本例中的name和age都是字段名,讀取的字段值分別保存在sName和cAge變量?jī)?nèi)。例中的Fields是Recordset對(duì)象的容器,GetItem方法返回的是Field對(duì)象,而Value則是Field對(duì)象的一個(gè)屬性(即該字段的值)。通過此例,應(yīng)掌握操縱對(duì)象屬性的方法。例如,要獲得Field 對(duì)象的Value屬性的值可以直接用屬性名Value來引用它(如上例),但也可以調(diào)用Get方法,例如:

            CString sName=(char*)(_bstr_t)(m_pRecordset->Fields->GetItem(_variant_t("name"))->GetValue());

            從此例還可以看到,判斷是否到達(dá)記錄集的末尾,使用記錄集的adoEOF屬性,其值若為真即到了結(jié)尾,反之則未到。判斷是否到達(dá)記錄集開頭,則可用BOF屬性。
            另外,讀取數(shù)據(jù)還有一個(gè)方法,就是定義一個(gè)綁定的類,然后通過綁定的變量得到字段值(詳見后面的介紹)。

            5、修改數(shù)據(jù)
            方法一:

            try
            {
                m_pRecordset->MoveFirst();  
                while(m_pRecordset->adoEOF==VARIANT_FALSE) 
                {   
                    m_pRecordset->Fields->GetItem(_variant_t("姓名"))->Value=_bstr_t("趙薇");
                    ......
                    m_pRecordset->Update();
                    m_pRecordset->MoveNext();   
                }
            }//try

            改變了Value屬性的值,即改變了字段的值。

            方法二:

            m_pRecordset->Fields->GetItem(_variant_t("姓名"))->PutValue(_bstr_t("趙薇"));

            方法三:就是用定義綁定類的方法(詳見后面的介紹)。

            6、添加記錄
            新記錄添加成功后,即自動(dòng)成為當(dāng)前記錄。AddNew方法有兩種形式,一個(gè)含有參數(shù),而另一個(gè)則不帶參數(shù)。
            方法一(不帶參數(shù)):

            // Add new record into this table:
            try
            {
                if(!m_pRecordset->Supports(adAddNew)) return;
                m_pRecordset->AddNew(); 
                m_pRecordset->Fields->GetItem(_variant_t("姓名"))->Value=_bstr_t("趙薇");
                m_pRecordset->Fields->GetItem(_variant_t("性別"))->Value=_bstr_t("女");
                m_pRecordset->Fields->GetItem(_variant_t("age"))->Value=_variant_t((short)20);
                m_pRecordset->Fields->GetItem(_variant_t("marry"))->Value=_bstr_t("未婚");
                m_pRecordset->Update();  
            }//try
            catch (_com_error &e)
            {
                ::MessageBox(NULL, "又出毛病了。","提示",MB_OK | MB_ICONWARNING);
            }

            這種方法弄完了還要調(diào)用Update()。
            方法二(帶參數(shù)):

            _variant_t varName[4],narValue[4];
            varName[0] = L"姓名";
            varName[1] = L"性別";
            varName[2] = L"age";
            varName[3] = L"marry";
            narValue[0]=_bstr_t("趙薇");
            narValue[1]=_bstr_t("女");
            narValue[2]=_variant_t((short)20);
            narValue[3]=_bstr_t("未婚");
            const int nCrit = sizeof varName / sizeof varName[0];

            // Create SafeArray Bounds and initialize the array
            SAFEARRAYBOUND rgsaName[1],rgsaValue[1];
            rgsaName[0].lLbound = 0;  
            rgsaName[0].cElements = nCrit;
            SAFEARRAY *psaName = SafeArrayCreate( VT_VARIANT, 1, rgsaName );
            rgsaValue[0].lLbound = 0;
            rgsaValue[0].cElements = nCrit;
            SAFEARRAY *psaValue = SafeArrayCreate( VT_VARIANT, 1, rgsaValue );

            // Set the values for each element of the array
            HRESULT hr1=S_OK.hr2=S_OK;

            for( long i = 0 ; i < nCrit && SUCCEEDED( hr1 ) && SUCCEEDED( hr2 );i++)  
            {     
                hr1=SafeArrayPutElement(psaName, &i,&varName[i]);
                hr2=SafeArrayPutElement(psaValue, &i,&narValue[i]);
            }
              
            // Initialize and fill the SafeArray
            VARIANT vsaName,vsaValue;  
            vsaName.vt = VT_VARIANT | VT_ARRAY;
            vsaValue.vt = VT_VARIANT | VT_ARRAY;
            V_ARRAY(&vsaName) = psaName;//&vsaName->parray=psaName;
            //see definition in oleauto.h file.
            V_ARRAY(&vsaValue) = psaValue;
               
            // Add a new record:
            m_pRecordset->AddNew(vsaName,vsaValue);

            這種方法不需要調(diào)用Update,因?yàn)樘砑雍螅珹DO會(huì)自動(dòng)調(diào)用它。此方法主要是使用SafeArray挺麻煩。

            方法三:就是用定義綁定類的方法(詳見后面的介紹)。

            7、刪除記錄
            調(diào)用Recordset的Delete方法就行了,刪除的是當(dāng)前記錄。要了解Delete的其它用法請(qǐng)查閱參考文獻(xiàn)。

            try
            {
                m_pRecordset->MoveFirst();  
                while(m_pRecordset->adoEOF==VARIANT_FALSE) 
                {
                    CString sName=(char*)(_bstr_t)(m_pRecordset->Fields->GetItem(_variant_t("姓名"))->Value);
                    if(::MessageBox(NULL,"姓名="+sName+"\n刪除她嗎?", "提示",MB_YESNO | MB_ICONWARNING)==IDYES)
                    {
                        m_pRecordset->Delete(adAffectCurrent);   
                        m_pRecordset->Update();
                    }
                    m_pRecordset->MoveNext();   
                }
            }//try
            catch (_com_error &e)
            {
                ::MessageBox(NULL,"又出毛病了。","提示",MB_OK | MB_ICONWARNING);
            }

            8、使用帶參數(shù)的命令
            Command對(duì)象所代表的就是一個(gè)Provider能夠理解的命令,如SQL語(yǔ)句等。使用Command對(duì)象的關(guān)鍵就是把表示命令的語(yǔ)句設(shè)置到CommandText屬性中,然后調(diào)用Command對(duì)象的Execute方法就行了。一般情況下在命令中無(wú)需使用參數(shù),但有時(shí)使用參數(shù),可以增加其靈活性和效率。

            (1). 建立連接、命令對(duì)象和記錄集對(duì)象
            本例中表示命令的語(yǔ)句就是一個(gè)SQL語(yǔ)句(SELECT語(yǔ)句)。SELECT語(yǔ)句中的問號(hào)?就代表參數(shù),如果要多個(gè)參數(shù),就多放幾個(gè)問號(hào),每個(gè)問號(hào)代表一個(gè)參數(shù)。

            _ConnectionPtr Conn1;
            _CommandPtr Cmd1;
            ParametersPtr *Params1 = NULL; // Not an instance of a smart pointer.
            _ParameterPtr Param1;
            _RecordsetPtr Rs1;

            try
            {
                // Create Connection Object (1.5 Version)
                Conn1.CreateInstance( __uuidof( Connection ) );
                Conn1->ConnectionString = bstrConnect;
                Conn1->Open( bstrEmpty, bstrEmpty, bstrEmpty, -1 );

                // Create Command Object
                Cmd1.CreateInstance( __uuidof( Command ) );
                Cmd1->ActiveConnection = Conn1;
                Cmd1->CommandText = _bstr_t("SELECT * FROM mytable WHERE age< ?");
            }//try

            要注意命令對(duì)象必須與連接對(duì)象關(guān)聯(lián)起來才能起作用,本例中將命令對(duì)象的ActiveConnection屬性設(shè)置為連接對(duì)象的指針,即為此目的:

            Cmd1->ActiveConnection = Conn1;

             (2). 創(chuàng)建參數(shù)對(duì)象,并給參數(shù)賦值

            // Create Parameter Object
            Param1 = Cmd1->CreateParameter( _bstr_t(bstrEmpty), adInteger, adParamInput, -1, _variant_t((long) 5) );
            Param1->Value = _variant_t( (long) 5 );
            Cmd1->Parameters->Append( Param1 );

            用命令對(duì)象的方法來創(chuàng)建一個(gè)參數(shù)對(duì)象,其中的長(zhǎng)度參數(shù)(第三個(gè))如果是固定長(zhǎng)度的類型,就填-1,如果是字符串等可變長(zhǎng)度的就填其實(shí)際長(zhǎng)度。Parameters是命令對(duì)象的一個(gè)容器,它的Append方法就是把創(chuàng)建的參數(shù)對(duì)象追加到該容器里。Append進(jìn)去的參數(shù)按先后順序與SQL語(yǔ)句中的問號(hào)從左至右一一對(duì)應(yīng)。

            (3). 執(zhí)行命令打開記錄集

            // Open Recordset Object
            Rs1 = Cmd1->Execute( &vtEmpty, &vtEmpty2, adCmdText );

            但要注意,用Command和Connection對(duì)象的Execute方法得到的Recordset是只讀的。因?yàn)樵诖蜷_Recordset之前,我們無(wú)法設(shè)置它的LockType屬性(其默認(rèn)值為只讀)。而在打開之后設(shè)置LockType不起作用。
            我發(fā)現(xiàn)用上述方法得到記錄集Rs1后,不但Rs1中的記錄無(wú)法修改,即使直接用SQL語(yǔ)句修改同一表中任何記錄都不行。
            要想能修改數(shù)據(jù),還是要用Recordset自己的Open方法才行,如:

            try{
                m_pRecordset->Open((IDispatch *) Cmd1, vtMissing, adOpenStatic, adLockOptimistic, adCmdUnspecified);
            }
            catch (_com_error &e)
            {
                ::MessageBox(NULL,"mytable表不存在。","提示",MB_OK | MB_ICONWARNING);
            }

            Recordset對(duì)象的Open方法真是太好了,其第一個(gè)參數(shù)可以是SQL語(yǔ)句、表名字、命令對(duì)象指針等等。

            9、響應(yīng)ADO的通知事件
            通知事件就是當(dāng)某個(gè)特定事件發(fā)生時(shí),由Provider通知客戶程序,換句話說,就是由Provider調(diào)用客戶程序中的一個(gè)特定的方法(即事件的處理函數(shù))。所以為了響應(yīng)一個(gè)事件,最關(guān)鍵的就是要實(shí)現(xiàn)事件的處理函數(shù)。

            (1). 從ConnectionEventsVt接口派生出一個(gè)類
            為了響應(yīng)_Connection的通知事件,應(yīng)該從ConnectionEventsVt接口派生出一個(gè)類:

            class CConnEvent : public ConnectionEventsVt
            {
            private:
                ULONG m_cRef;

            public:
                CConnEvent() { m_cRef = 0; };
                ~CConnEvent() {};

                STDMETHODIMP QueryInterface(REFIID riid, void ** ppv);
                STDMETHODIMP_(ULONG) AddRef(void);
                STDMETHODIMP_(ULONG) Release(void);
                STDMETHODIMP raw_InfoMessage( struct Error *pError, EventStatusEnum *adStatus, struct _Connection *pConnection);
                STDMETHODIMP raw_BeginTransComplete( LONG TransactionLevel, struct Error *pError, EventStatusEnum *adStatus, struct _Connection *pConnection);
                ......
            };

            (2). 實(shí)現(xiàn)每一個(gè)事件的處理函數(shù)(凡是帶raw_前綴的方法都把它實(shí)現(xiàn)了):

            STDMETHODIMP CConnEvent::raw_InfoMessage( struct Error *pError, EventStatusEnum *adStatus, struct _Connection *pConnection)
            {
                *adStatus = adStatusUnwantedEvent;
                return S_OK;
            };

            有些方法雖然你并不需要,但也必須實(shí)現(xiàn)它,只需簡(jiǎn)單地返回一個(gè)S_OK即可。但如果要避免經(jīng)常被調(diào)用,還應(yīng)在其中將adStatus參數(shù)設(shè)置為adStatusUnwantedEvent,則在本次調(diào)用后,以后就不會(huì)被調(diào)用了。
            另外還必須實(shí)現(xiàn)QueryInterface, AddRef, 和Release三個(gè)方法: 

            STDMETHODIMP CConnEvent::QueryInterface(REFIID riid, void ** ppv)
            {
                *ppv = NULL;
                if (riid == __uuidof(IUnknown) || riid == __uuidof(ConnectionEventsVt))
                    *ppv = this;

                if (*ppv == NULL)
                    return ResultFromScode(E_NOINTERFACE);

                AddRef();
                return NOERROR;
            }

            STDMETHODIMP_(ULONG) CConnEvent::AddRef() { return ++m_cRef; };

            STDMETHODIMP_(ULONG) CConnEvent::Release()
            {
                if (0 != --m_cRef)
                    return m_cRef;

                delete this;
                return 0;
            }

            (3). 開始響應(yīng)通知事件

            // Start using the Connection events
            IConnectionPointContainer *pCPC = NULL;
            IConnectionPoint *pCP = NULL;
            hr = pConn.CreateInstance(__uuidof(Connection));
            if (FAILED(hr))
                return;

            hr = pConn->QueryInterface(__uuidof(IConnectionPointContainer), (void **)&pCPC);
            if (FAILED(hr))
                return;

            hr = pCPC->FindConnectionPoint(__uuidof(ConnectionEvents), &pCP);
            pCPC->Release();
            if (FAILED(hr))
                return;

            pConnEvent = new CConnEvent();
            hr = pConnEvent->QueryInterface(__uuidof(IUnknown), (void **) &pUnk);
            if (FAILED(hr))
                return rc;

            hr = pCP->Advise(pUnk, &dwConnEvt);
            pCP->Release();
            if (FAILED(hr))
                return;

            pConn->Open("dsn=Pubs;", "sa", "", adConnectUnspecified);

            也就是說在連接(Open)之前就做這些事。

            (4). 停止響應(yīng)通知事件

            pConn->Close();
            // Stop using the Connection events
            hr = pConn->QueryInterface(__uuidof(IConnectionPointContainer), (void **) &pCPC);
            if (FAILED(hr))
                return;

            hr = pCPC->FindConnectionPoint(__uuidof(ConnectionEvents), &pCP);
            pCPC->Release();
            if (FAILED(hr))
                return rc;

            hr = pCP->Unadvise( dwConnEvt );
            pCP->Release();
            if (FAILED(hr))
                return;

            在連接關(guān)閉之后做這件事。

            10、邦定數(shù)據(jù)
            定義一個(gè)綁定類,將其成員變量綁定到一個(gè)指定的記錄集,以方便于訪問記錄集的字段值。

            (1). 從CADORecordBinding派生出一個(gè)類:

            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宏關(guān)聯(lián)起來。每個(gè)字段對(duì)應(yīng)于兩個(gè)變量,一個(gè)存放字段的值,另一個(gè)存放字段的狀態(tài)。字段用從1開始的序號(hào)表示,如1,2,3等等。
            特別要注意的是:如果要綁定的字段是字符串類型,則對(duì)應(yīng)的字符數(shù)組的元素個(gè)數(shù)一定要比字段長(zhǎng)度大2(比如m_szau_fname[22],其綁定的字段au_fname的長(zhǎng)度實(shí)際是20),不這樣綁定就會(huì)失敗。我分析多出的2可能是為了存放字符串結(jié)尾的空字符null和BSTR字符串開頭的一個(gè)字(表示BSTR的長(zhǎng)度)。這個(gè)問題對(duì)于初學(xué)者來說可能是一個(gè)意想不到的問題。
            CADORecordBinding類的定義在icrsint.h文件里,內(nèi)容是:

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

            BEGIN_ADO_BINDING宏的定義也在icrsint.h文件里,內(nèi)容是:

            #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接口才能綁定,調(diào)用它的BindToRecordset方法就行了。

            (3). rs中的變量即是當(dāng)前記錄字段的值

            //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();

            只要字段的狀態(tài)是adFldOK,就可以訪問。如果修改了字段,不要忘了先調(diào)用picRs的Update(注意不是Recordset的Update),然后才關(guān)閉,也不要忘了釋放picRs(即picRs->Release();)。

            (4). 此時(shí)還可以用IADORecordBinding接口添加新紀(jì)錄

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

            11. 訪問長(zhǎng)數(shù)據(jù)
            在Microsoft SQL中的長(zhǎng)數(shù)據(jù)包括text、image等這樣長(zhǎng)類型的數(shù)據(jù),作為二進(jìn)制字節(jié)來對(duì)待。
            可以用Field對(duì)象的GetChunk和AppendChunk方法來訪問。每次可以讀出或?qū)懭肴繑?shù)據(jù)的一部分,它會(huì)記住上次訪問的位置。但是如果中間訪問了別的字段后,就又得從頭來了。
            請(qǐng)看下面的例子:
            //寫入一張照片到數(shù)據(jù)庫(kù):

            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();

            //從數(shù)據(jù)庫(kù)讀一張照片:
            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問題
            學(xué)會(huì)使用SafeArray也是很重要的,因?yàn)樵贏DO編程中經(jīng)常要用。它的主要目的是用于automation中的數(shù)組型參數(shù)的傳遞。因?yàn)樵诰W(wǎng)絡(luò)環(huán)境中,數(shù)組是不能直接傳遞的,而必須將其包裝成SafeArray。實(shí)質(zhì)上SafeArray就是將通常的數(shù)組增加一個(gè)描述符,說明其維數(shù)、長(zhǎng)度、邊界、元素類型等信息。SafeArray也并不單獨(dú)使用,而是將其再包裝到VARIANT類型的變量中,然后才作為參數(shù)傳送出去。在VARIANT的vt成員的值如果包含VT_ARRAY|...,那么它所封裝的就是一個(gè)SafeArray,它的parray成員即是指向SafeArray的指針。SafeArray中元素的類型可以是VARIANT能封裝的任何類型,包括VARIANT類型本身。 
            使用SafeArray的具體步驟:

            方法一:
             包裝一個(gè)SafeArray:

            (1). 定義變量,如:
            VARIANT varChunk;
            SAFEARRAY *psa;
            SAFEARRAYBOUND rgsabound[1];

            (2). 創(chuàng)建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). 放置數(shù)據(jù)元素到SafeArray:
            for(long index=0;index<uIsRead;index++) 
            {
                if(FAILED(SafeArrayPutElement(psa,&index,&bVal[index])))
                    ::MessageBox(NULL,"出毛病了。","提示",MB_OK | MB_ICONWARNING);
            }
             一個(gè)一個(gè)地放,挺麻煩的。

            (4). 封裝到VARIANT內(nèi):
            varChunk.vt = VT_ARRAY|VT_UI1;
            varChunk.parray = psa;
             這樣就可以將varChunk作為參數(shù)傳送出去了。
             讀取SafeArray中的數(shù)據(jù)的步驟:

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

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

             就讀到緩沖區(qū)buf里了。

            方法二:
             使用SafeArrayAccessData直接讀寫SafeArray的緩沖區(qū):

            (1). 讀緩沖區(qū):
            BYTE *buf;
            SafeArrayAccessData(varChunk.parray, (void **)&buf);
            f.Write(buf,lIsRead);
            SafeArrayUnaccessData(varChunk.parray);

            (2). 寫緩沖區(qū):
            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的數(shù)據(jù)緩沖區(qū),比用SafeArrayGetElement和SafeArrayPutElement速度快。特別適合于讀取數(shù)據(jù)。但用完之后不要忘了調(diào)用::SafeArrayUnaccessData(psa),否則會(huì)出錯(cuò)的。

            13. 使用書簽( bookmark )
            書簽可以唯一標(biāo)識(shí)記錄集中的一個(gè)記錄,用于快速地將當(dāng)前記錄移回到已訪問過的記錄,以及進(jìn)行過濾等等。Provider會(huì)自動(dòng)為記錄集中的每一條記錄產(chǎn)生一個(gè)書簽,我們只需要使用它就行了。我們不能試圖顯示、修改或比較書簽。ADO用記錄集的Bookmark屬性表示當(dāng)前記錄的書簽。
            用法步驟:

            (1). 建立一個(gè)VARIANT類型的變量
            _variant_t VarBookmark;

            (2). 將當(dāng)前記錄的書簽值存入該變量
            也就是記錄集的Bookmark屬性的當(dāng)前值。
            VarBookmark = rst->Bookmark;

            (3). 返回到先前的記錄
            將保存的書簽值設(shè)置到記錄集的書簽屬性中:

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

            設(shè)置完后,當(dāng)前記錄即會(huì)移動(dòng)到該書簽指向的記錄。

            14、設(shè)置過濾條件
            Recordset對(duì)象的Filter屬性表示了當(dāng)前的過濾條件。它的值可以是以AND或OR連接起來的條件表達(dá)式(不含WHERE關(guān)鍵字)、由書簽組成的數(shù)組或ADO提供的FilterGroupEnum枚舉值。為Filter屬性設(shè)置新值后Recordset的當(dāng)前記錄指針會(huì)自動(dòng)移動(dòng)到滿足過濾條件的第一個(gè)記錄。例如:
            rst->Filter = _bstr_t ("姓名='趙薇' AND 性別=’女’");
            在使用條件表達(dá)式時(shí)應(yīng)注意下列問題:

            (1)、可以用圓括號(hào)組成復(fù)雜的表達(dá)式
            例如:
            rst->Filter = _bstr_t ("(姓名='趙薇' AND 性別=’女’) OR AGE<25");
            但是微軟不允許在括號(hào)內(nèi)用OR,然后在括號(hào)外用AND,例如:
            rst->Filter = _bstr_t ("(姓名='趙薇' OR 性別=’女’) AND AGE<25");
            必須修改為:
            rst->Filter = _bstr_t ("(姓名='趙薇' AND AGE<25) OR (性別=’女’ AND AGE<25)");

            (2)、表達(dá)式中的比較運(yùn)算符可以是LIKE
            LIKE后被比較的是一個(gè)含有通配符*的字符串,星號(hào)表示若干個(gè)任意的字符。
            字符串的首部和尾部可以同時(shí)帶星號(hào)*
            rst->Filter = _bstr_t ("姓名 LIKE '*趙*' ");
            也可以只是尾部帶星號(hào):
            rst->Filter = _bstr_t ("姓名 LIKE '趙*' ");
            Filter屬性值的類型是Variant,如果過濾條件是由書簽組成的數(shù)組,則需將該數(shù)組轉(zhuǎn)換為SafeArray,然后再封裝到一個(gè)VARIANT或_variant_t型的變量中,再賦給Filter屬性。

            15、索引與排序

            (1)、建立索引
            當(dāng)以某個(gè)字段為關(guān)鍵字用Find方法查找時(shí),為了加快速度可以以該字段為關(guān)鍵字在記錄集內(nèi)部臨時(shí)建立索引。只要將該字段的Optimize屬性設(shè)置為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中稱為動(dòng)態(tài)屬性),ADO本身沒有此屬性。

            (2)、排序
            要排序也很簡(jiǎn)單,只要把要排序的關(guān)鍵字列表設(shè)置到Recordset對(duì)象的Sort屬性里即可,例如:

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

            關(guān)鍵字(即字段名)之間用逗號(hào)隔開,如果要以某關(guān)鍵字降序排序,則應(yīng)在該關(guān)鍵字后加一空格,再加DESC(如上例)。升序時(shí)ASC加不加無(wú)所謂。本操作是利用索引進(jìn)行的,并未進(jìn)行物理排序,所以效率較高。
            但要注意,在打開記錄集之前必須將記錄集的CursorLocation屬性設(shè)置為adUseClient,如上例所示。Sort屬性值在需要時(shí)隨時(shí)可以修改。

            16、事務(wù)處理
            ADO中的事務(wù)處理也很簡(jiǎn)單,只需分別在適當(dāng)?shù)奈恢谜{(diào)用Connection對(duì)象的三個(gè)方法即可,這三個(gè)方法是:

            (1)、在事務(wù)開始時(shí)調(diào)用
            pCnn->BeginTrans();

            (2)、在事務(wù)結(jié)束并成功時(shí)調(diào)用
            pCnn->CommitTrans ();

            (3)、在事務(wù)結(jié)束并失敗時(shí)調(diào)用
            pCnn->RollbackTrans ();

            在使用事務(wù)處理時(shí),應(yīng)盡量減小事務(wù)的范圍,即減小從事務(wù)開始到結(jié)束(提交或回滾)之間的時(shí)間間隔,以便提高系統(tǒng)效率。需要時(shí)也可在調(diào)用BeginTrans()方法之前,先設(shè)置Connection對(duì)象的IsolationLevel屬性值,詳細(xì)內(nèi)容參見MSDN中有關(guān)ADO的技術(shù)資料。

            三、使用ADO編程常見問題解答
            以下均是針對(duì)MS SQL 7.0編程時(shí)所遇問題進(jìn)行討論。

            1、連接失敗可能原因
            Enterprise Managemer內(nèi),打開將服務(wù)器的屬性對(duì)話框,在Security選項(xiàng)卡中,有一個(gè)選項(xiàng)Authentication。
            如果該選項(xiàng)是Windows NT only,則你的程序所用的連接字符串就一定要包含Trusted_Connection參數(shù),并且其值必須為yes,如:

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

            如果不按上述操作,程序運(yùn)行時(shí)連接必然失敗。
            如果Authentication選項(xiàng)是SQL Server and Windows NT,則你的程序所用的連接字符串可以不包含Trusted_Connection參數(shù),如:

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

            因?yàn)锳DO給該參數(shù)取的默認(rèn)值就是no,所以可以省略。我認(rèn)為還是取默認(rèn)值比較安全一些。

            2、改變當(dāng)前數(shù)據(jù)庫(kù)的方法
            使用Tansct-SQL中的USE語(yǔ)句即可。

            3、如何判斷一個(gè)數(shù)據(jù)庫(kù)是否存在
            (1)、可打開master數(shù)據(jù)庫(kù)中一個(gè)叫做SCHEMATA的視圖,其內(nèi)容列出了該服務(wù)器上所有的數(shù)據(jù)庫(kù)名稱。
            (2) 、更簡(jiǎn)便的方法是使用USE語(yǔ)句,成功了就存在;不成功,就不存在。例如:

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

            4、判斷一個(gè)表是否存在
            (1)、同樣判斷一個(gè)表是否存在,也可以用是否成功地打開它來判斷,十分方便,例如:

            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)、要不然可以采用麻煩一點(diǎn)的辦法,就是在MS-SQL服務(wù)器上的每個(gè)數(shù)據(jù)庫(kù)中都有一個(gè)名為sysobjects的表,查看此表的內(nèi)容即知指定的表是否在該數(shù)據(jù)庫(kù)中。
            (3)、同樣,每個(gè)數(shù)據(jù)庫(kù)中都有一個(gè)名為TABLES的視圖(View),查看此視圖的內(nèi)容即知指定的表是否在該數(shù)據(jù)庫(kù)中。

            5、類型轉(zhuǎn)換問題

            (1)、類型VARIANT_BOOL
            類型VARIANT_BOOL等價(jià)于short類型。The VARIANT_BOOL is equivalent to short. see it's definition below:
            typdef short VARIANT_BOOL

            (2)、_com_ptr_t類的類型轉(zhuǎn)換
            _ConnectionPtr可以自動(dòng)轉(zhuǎn)換成IDspatch*類型,這是因?yàn)開ConnectionPtr實(shí)際上是_com_ptr_t類的一個(gè)實(shí)例,而這個(gè)類有此類型轉(zhuǎn)換函數(shù)。
            同理,_RecordsetPtr和_CommandPtr也都可以這樣轉(zhuǎn)換。

            (3)、_bstr_t和_variant_t類
            在ADO編程時(shí),_bstr_t和_variant_t這兩個(gè)類很有用,省去了許多BSTR和VARIANT類型轉(zhuǎn)換的麻煩。

            6、打開記錄集時(shí)的問題
            在打開記錄集時(shí),在調(diào)用Recordset的Open方法時(shí),其最后一個(gè)參數(shù)里一定不能包含adAsyncExecute,否則將因?yàn)槭钱惒讲僮鳎谧x取數(shù)據(jù)時(shí)無(wú)法讀到數(shù)據(jù)。

            7、異常處理問題
            對(duì)所有調(diào)用ADO的語(yǔ)句一定要用try和catch語(yǔ)句捕捉異常,否則在發(fā)生異常時(shí),程序會(huì)異常退出。

            8、使用SafeArray問題
            在初學(xué)使用中,我曾遇到一個(gè)傷腦筋的問題,一定要注意:
            在定義了SAFEARRAY的指針后,如果打算重復(fù)使用多次,則在中間可以調(diào)用::SafeArrayDestroyData釋放數(shù)據(jù),但決不能調(diào)用::SafeArrayDestroyDescriptor,否則必然出錯(cuò),即使調(diào)用SafeArrayCreate也不行。例如:

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

            我分析在定義psa指針時(shí),一個(gè)SAFEARRAY的實(shí)例(也就是SAFEARRAY描述符)也同時(shí)被自動(dòng)建立了。但是只要一調(diào)用::SafeArrayDestroyDescriptor,描述符就被銷毀了。
            所以我認(rèn)為::SafeArrayDestroyDescriptor可以根本就不調(diào)用,即使調(diào)用也必須在最后調(diào)用。

            9、重復(fù)使用命令對(duì)象問題
            一個(gè)命令對(duì)象如果要重復(fù)使用多次(尤其是帶參數(shù)的命令),則在第一次執(zhí)行之前,應(yīng)將它的Prepared屬性設(shè)置為TRUE。這樣會(huì)使第一次執(zhí)行減慢,但卻可以使以后的執(zhí)行全部加快。

            10、綁定字符串型字段問題
            如果要綁定的字段是字符串類型,則對(duì)應(yīng)的字符數(shù)組的元素個(gè)數(shù)一定要比字段長(zhǎng)度大2(比如m_szau_fname[22],其綁定的字段au_fname的長(zhǎng)度實(shí)際是20),不這樣綁定就會(huì)失敗。

            11、使用AppendChunk的問題
            當(dāng)用AddNew方法剛剛向記錄集內(nèi)添加一個(gè)新記錄之后,不能首先向一個(gè)長(zhǎng)數(shù)據(jù)字段(image類型)寫入數(shù)據(jù),必須先向其他字段寫入過數(shù)據(jù)之后,才能調(diào)用AppendChunk寫該字段,否則出錯(cuò)。也就是說,AppendChunk不能緊接在AddNew之后。另外,寫入其他字段后還必須緊接著調(diào)用AppendChunk,而不能調(diào)用記錄集的Update方法后,才調(diào)用AppendChunk,否則調(diào)用AppendChunk時(shí)也會(huì)出錯(cuò)。換句話說,就是必須AppendChunk在前,Update在后。因而這個(gè)時(shí)候就不能使用帶參數(shù)的AddNew了,因?yàn)閹?shù)的AddNew會(huì)自動(dòng)調(diào)用記錄集的Update,所以AppendChunk就跑到Update的后面了,就只有出錯(cuò)了!因此,這時(shí)應(yīng)該用不帶參數(shù)的AddNew。
            我推測(cè)這可能是MS SQL 7.0的問題,在MS SQL 2000中則不存在這些問題,但是AppendChunk仍然不能在Update之后。

            四、小結(jié)
            一般情況下,Connection和Command的Execute用于執(zhí)行不產(chǎn)生記錄集的命令,而Recordset的Open用于產(chǎn)生一個(gè)記錄集,當(dāng)然也不是絕對(duì)的。特別Command主要是用于執(zhí)行參數(shù)化的命令,可以直接由Command對(duì)象執(zhí)行,也可以將Command對(duì)象傳遞給Recordset的Open。
            本文中的代碼片斷均在VC++ 6.0、Windows NT 4.0 SP6和MS SQL 7.0中調(diào)試通過。相信您讀過之后,編寫簡(jiǎn)單的數(shù)據(jù)庫(kù)程序應(yīng)該沒有問題了。當(dāng)然要編寫比較實(shí)用的、復(fù)雜一點(diǎn)的程序,還需要對(duì)OLE DB、ADO以及數(shù)據(jù)庫(kù)平臺(tái)再多了解一點(diǎn),希望您繼續(xù)努力,一定會(huì)很快成功的!詳細(xì)參考資料請(qǐng)參見微軟MSDN July 2000光盤或MS SQL 7.0在線文檔資料(Books online)。文中難免有錯(cuò)誤和不妥之處,敬請(qǐng)各位批評(píng)指正!
            參考文獻(xiàn):
            1、 微軟MSDN Library - July 2000 / Platform SDK / Data Services / Microsoft Data Access Components (MDAC) / Microsoft ActiveX Data Objects (ADO)
            2、 微軟MS SQL 7.0在線文檔資料(Books online)---- Building SQL Server Applications / ADO and SQL Server
            3、 微軟MS SQL 7.0在線文檔資料(Books online)---- Building SQL Server Applications / Transact – SQL Reference
            4、 微軟MSDN Library - July 2000 / Platform SDK / Data Services / Microsoft Data Access Components (MDAC) / Microsoft OLE DB
             

             

             




            本站中所有文章以及圖形均為作者本人、公司所有,本站所有資訊僅供參考,若有任何損失本站概不負(fù)責(zé),請(qǐng)自行斟酌。
            CopyRight 2001-200? GameRes.com All Rights reserved.
            This site is optimized for at least 1024x768 resolution (hi-color) viewing with a browser that supports style sheets.


            只有注冊(cè)用戶登錄后才能發(fā)表評(píng)論。
            網(wǎng)站導(dǎo)航: 博客園   IT新聞   BlogJava   博問   Chat2DB   管理


            久久亚洲精品人成综合网| 伊人精品久久久久7777| 亚洲国产精品无码久久久秋霞2 | 91精品国产91热久久久久福利 | 99久久国产免费福利| 久久久久久久综合日本亚洲| 久久精品国产第一区二区三区| 无码国内精品久久人妻| 亚洲欧美成人综合久久久 | 久久成人精品视频| 久久精品国产69国产精品亚洲| 91精品国产高清91久久久久久| 久久99国产乱子伦精品免费| 99久久超碰中文字幕伊人| 久久精品亚洲日本波多野结衣 | 久久精品夜夜夜夜夜久久| 99久久超碰中文字幕伊人| 久久精品人人做人人爽电影| 久久九九亚洲精品| 精品国产91久久久久久久a| 久久中文字幕视频、最近更新| 色婷婷噜噜久久国产精品12p | 久久夜色精品国产亚洲| 中文字幕久久波多野结衣av| 久久综合噜噜激激的五月天| 国产综合久久久久| 91久久精品视频| 老司机午夜网站国内精品久久久久久久久 | 国产成人综合久久综合| 国产日产久久高清欧美一区| 国产毛片久久久久久国产毛片 | 久久综合久久性久99毛片| 无码8090精品久久一区| 天堂久久天堂AV色综合| 狠狠色丁香久久婷婷综| 无码人妻少妇久久中文字幕| 一本色道久久88精品综合| 国产韩国精品一区二区三区久久| 久久97久久97精品免视看| 综合久久国产九一剧情麻豆 | 青青草原综合久久大伊人导航|