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 | | | |
|
|