//執行存貯過程，將值返回

 _CommandPtr cmd;
 cmd.CreateInstance("ADODB.Command");
 //id號
 _ParameterPtr pParamRk;  
 pParamRk.CreateInstance("ADODB.Parameter");
 pParamRk->Name="job_id"; //存儲過程的參數1
 pParamRk->Type=adInteger; //整型
 pParamRk->Size=2;   //
 pParamRk->Direction=adParamInput;//表明是輸入參數
 CString tstr;
 tstr.Format("%d",id);
 pParamRk->Value=_variant_t(tstr);//int->CString->_variant_t後賦值
 cmd->Parameters->Append(pParamRk);
 //返回值
 _ParameterPtr pParamOk;  
 pParamOk.CreateInstance("ADODB.Parameter");
 pParamOk->Name="desc";  //參數2名稱
 pParamOk->Type=adChar;  //字符串
 pParamOk->Size=20;   //大小爲20個字節
 pParamOk->Direction=adParamOutput; //聲明是輸出參數
 cmd->Parameters->Append(pParamOk);
 //_variant_t TheValue = MySet->GetCollect("FIELD_1"); 
 //CString sValue=(char*)_bstr_t(TheValue);

 cmd->ActiveConnection = piConnection;
 cmd->CommandText="test"; //存儲過程的名字
 cmd->CommandType=adCmdStoredProc;//表示爲存儲過程adCmdStoredProc
    //執行,獲得結果
    cmd->Execute(NULL, NULL, adCmdStoredProc);
    //將值返回
 return (char*)_bstr_t(pParamOk->Value);