關(guān)于ADO調(diào)用存儲(chǔ)過程的 方法在很多書中都有講到，標(biāo)準(zhǔn)的做法無非是按照以下步驟進(jìn)行： 1、生成并初始化一個(gè)_CommandPtr對(duì)象； 2、生成調(diào)用存儲(chǔ)過程需要的參數(shù)，這些參數(shù)都是_ParameterPtr對(duì)象； 3、按照順序?qū)⑹褂胈CommandPtr的Append方法為存儲(chǔ)過程提供參數(shù)（包括輸入?yún)?shù) 和輸出參數(shù)）； 4、為_CommandPtr對(duì)象指定需要使用的ADO連接； 5、使用_CommandPtr的Execute方法調(diào)用存儲(chǔ)過程； 6、從結(jié)果中獲取返回參數(shù)的值（如果有的話）。
具體的過程在此我不詳細(xì)描述，我想看看本文附帶的代碼就應(yīng)該很明白了。
在這里我想就我使用ADO調(diào)用存儲(chǔ)過程時(shí)的一些體會(huì)說明一下。
1、關(guān)于CreateParameter函數(shù)
該函數(shù)的原型為：CreateParameter (Name, Type, Direction, Size, Value)
其中Name是參數(shù)的名稱，可以指定也可以不指定； Type是一個(gè)DataTypeEnum值，指定參數(shù)的類別，取值有adInteger（整型）、adChar（字符/字符串型）等； Direction是一個(gè)ParameterDirectionEnum值，其取值為adParamInput、adParamInputOutput、 adParamOutput、adParamReturnValue、adParamUnknown； Size是一個(gè)Long類型的值，指示該參數(shù)值以字節(jié)計(jì)算的最大長(zhǎng)度，例如對(duì)int型，該值可以取為sizeof(int)， 對(duì)Long型，該值可以取為sizeof(long)，對(duì)字符串型，可以使用該字符串的長(zhǎng)度； Value是一個(gè)variant類型的值，是該參數(shù)的取值。
在這里需要注意的是，Type參數(shù)、Direction參數(shù)以及Size參數(shù)一定要和存儲(chǔ)過程定義時(shí)的參數(shù)相吻合，
例如，如果有下面一個(gè)存儲(chǔ)過程 CREATE PROCEDURE SMS_Proc_Handle_All (@UserID Integer, @SourAddr Varchar(15), @DestAddr varchar(5000), @AvValue Single output, @ReturnInfo varchar(100) output ) 則Type參數(shù)的取值依次為adInteger、adChar、adChar、adSingle，adChar； Direction參數(shù)的取值依次為adParameterIn、adParameterIn、adParameterIn、adParameterOut、adParameterOut； 對(duì)于輸入?yún)?shù)，Size的值可以根據(jù)實(shí)際數(shù)值來定，對(duì)于輸出參數(shù)，最好是根據(jù)定義確定（上例中ReturnInfo參數(shù)的 Size值可以取為100）。
2，關(guān)于獲取Output的參數(shù)
獲取ourput參數(shù)是大家最關(guān)注的問題，同時(shí)也是最“難”的問題，因?yàn)榘凑諘旧系膶懛ǎ?jīng)常獲得不了 Output參數(shù)，其實(shí)這個(gè)問題很容易解決：在調(diào)用_CommandPtr的Execute方法時(shí)，寫成 cmmd->Execute(NULL, NULL, adCmdStoredProc); 而不要寫成 RecordsetPtr rec = cmmd->Execute(NULL, NULL, adCmdStoredProc); 也就是說，不取返回值（我不知道這是為什么，但是相信我，事情就是這樣）。 這句執(zhí)行完后，使用 cmmd->Parameters->GetItem("XXXXXX")->GetValue(); ^^^^^^^ 輸出參數(shù)的名稱 就可以獲得輸出參數(shù)的值了。
以下是一個(gè)通過ADO調(diào)用存儲(chǔ)過程的部分代碼：
_CommandPtr cmmd; HRESULT hr = cmmd.CreateInstance(__uuidof(Command)); if(FAILED(hr)) { AfxMessageBox("NewNetDatabase()中創(chuàng)建_CommandPtr對(duì)象失敗"); return 0; } _ParameterPtr param; param = cmmd->CreateParameter(""/*NetType*/,adTinyInt, adParamInput, sizeof(BYTE),(BYTE)(m_nNetType+1)); cmmd->Parameters->Append