ADO 调用存贮过程时,向_CommandPtr指针加入多个输入参数。如果通过修改参数值,反复执行pCommand->Execute第二次执行时,调用存贮过程时的值会不正确。如
pCommand.CreateInstance(__uuidof(Command));
_variant_t vNull, Index;
pCommand->ActiveConnection=theApp.m_pConnection;
pCommand->CommandText = "[BiYing]..[StockKLine]";
pCommand->CommandType = adCmdStoredProc;
_ParameterPtr pParameter[9];
pParameter[0] = pCommand->CreateParameter("代码", adChar, adParamInput, 6,pszZqdm);
pParameter[1] = pCommand->CreateParameter("时间", adDBTimeStamp, adParamInput,sizeof(DATE));
.......
pParameter[7] = pCommand->CreateParameter("成交额", adDecimal, adParamInput, 18);
pParameter[8] = pCommand->CreateParameter("类别", adTinyInt, adParamInput, sizeof(short int), nCategory);
pParameter[7]->PutPrecision(18);
pParameter[7PutNumericScale(3);
for (int i = 0; i <9; i++) {
pCommand->Parameters->Append(pParameter[i]);
}
如上面定议参数,参数0、参数8赋初值后不变,其它参数改变反复执行,会出现执行存储后只有第一次的得出的全部结果是正确的,第二次后传递给存贮过程的参数0是错误的(其它正确,传过去的参数0全变为-1).
解决办法是在参数0前加个返回参数。改为如下则解决了。两次使用的是同一存贮过程,本身并未带返回语句。看来无论有无返回,存贮过程都认为有返回值,且认把返回参数作值作为ADO调用的第一个参数。但如果不是通过参数反复执行存贮过程,则不用把参数0设为返回参数。
pCommand.CreateInstance(__uuidof(Command));
_variant_t vNull, Index;
pCommand->ActiveConnection=theApp.m_pConnection;
pCommand->CommandText = "[BiYing]..[StockKLine]";
pCommand->CommandType = adCmdStoredProc;
_ParameterPtr pParameter[10];
pParameter[0] = pCommand->CreateParameter("", adInteger, adParamReturnValue, sizeof(int));
pParameter[1] = pCommand->CreateParameter("代码", adChar, adParamInput, 6,pszZqdm);
....
pParameter[7] = pCommand->CreateParameter("成交量", adInteger, adParamInput,sizeof(INT));
pParameter[8] = pCommand->CreateParameter("成交额", adDecimal, adParamInput, 18);
pParameter[9] = pCommand->CreateParameter("类别", adTinyInt, adParamInput, sizeof(short int), nCategory);
pParameter[8]->PutPrecision(18);
pParameter[8]->PutNumericScale(3);
for (int i = 0; i <10; i++) {
pCommand->Parameters->Append(pParameter[i]);
}