VC调用MSSQL存储过程,该如何处理

VC调用MSSQL存储过程
在VC６里调用一个MSSQL里的存储过程，因为有很多数据要重复调用这个存储过程，但是每次都要CLOSE后再重新连接数据库才能调用它INSERT数据．．不然就报错．．感觉是传入参数的原因．．但没找到解决办法．请问有什么方法解决吗？
下面是代码和一些说明：
传入参数：const char* pStoreName,//表名
 const char *pInsert, const char *pUpdate, const char *pTableName,const char *psfid　//存储过程input
int& type, int& flag //存储过程output

bool CAdoModule::ExecStoredProc_SfDataUp(const char* pStoreName, const char *pInsert, const char *pUpdate, const char *pTableName,const char *psfid, int& type, int& flag)
{
char sz_msg[256] = {0};
char sz_buf[128] = {0};

//---如果这里不重连，第二次调用此代码里的Execute(&vNULL, &vNULL, adCmdStoredProc);
　　　　　//----的是候会跳转到catch (::_com_error e)里并产生＃３０９２的错．
　　　　　//----如果调用，该代码不会出错．但是太浪费时间了．每调一次重连一次
　　　　　//----个人猜测是在m_pADOCmd->Parameters->Append(ptr_insert); 增加参数这里出错，前面没清除，第二轮又
          //----插入了新的数据，导至参数比我想要传进的参数多，但是我做了ptr_insert->Release();感觉没效
　　　　　//---但是如果是UPDATE．却不会出错．只是INSERT出错．求解．．．．．
CloseDb();
if(!ReInitAdo()) return false;

try
{
_variant_t RecordsAffected;
_variant_t vNULL;
_variant_t VretVal; //return
vNULL.vt = VT_ERROR;
vNULL.scode = DISP_E_PARAMNOTFOUND; //定义为无参数
m_pADOCmd->ActiveConnection = m_pADOCon; //非常关键的一句，将建立的连接赋值给它
m_pADOCmd->CommandType = adCmdStoredProc;
//m_pADOCmd->Parameters->Refresh();

//----增加输入参数----
_ParameterPtr ptr_insert;
_ParameterPtr ptr_update;
_ParameterPtr ptr_tablename;
_ParameterPtr ptr_sfid;
_ParameterPtr ptr_out_type;
_ParameterPtr ptr_out_flag;

// char sz_test[4096] = {0};
// strcpy(sz_test, pInsert);
//----input参数
ptr_insert = m_pADOCmd->CreateParameter("@str_insert", adVarChar , adParamInput, 4000, _variant_t(pInsert)) ;
m_pADOCmd->Parameters->Append(ptr_insert); 

// strcpy(sz_test, pUpdate);
ptr_update = m_pADOCmd->CreateParameter("@str_update", adVarChar , adParamInput, 4000, _variant_t(pUpdate)) ;
m_pADOCmd->Parameters->Append(ptr_update); 

ptr_tablename = m_pADOCmd->CreateParameter("@str_tablename", adVarChar, adParamInput, 128, _variant_t(pTableName)) ;
m_pADOCmd->Parameters->Append(ptr_tablename); 

ptr_sfid = m_pADOCmd->CreateParameter("@str_sfid", adVarChar, adParamInput, 32, _variant_t(psfid)) ;
m_pADOCmd->Parameters->Append(ptr_sfid);

char sz_buf[8] = {0};
_snprintf(sz_buf, sizeof(sz_buf) - 1, "%d", type);
ptr_out_type = m_pADOCmd->CreateParameter("@n_type", adInteger, adParamOutput, 8, _variant_t(sz_buf)) ;
m_pADOCmd->Parameters->Append(ptr_out_type);

_snprintf(sz_buf, sizeof(sz_buf) - 1, "%d", flag);
ptr_out_flag = m_pADOCmd->CreateParameter("@n_flag", adInteger, adParamOutput, 8, _variant_t(sz_buf)) ;
m_pADOCmd->Parameters->Append(ptr_out_flag);

m_pADOCmd->CommandText = _bstr_t(pStoreName);//命令字串

m_pADORec = m_pADOCmd->Execute(&vNULL, &vNULL, adCmdStoredProc);


VretVal = ptr_out_type->Value;
type = VretVal.lVal;

VretVal = ptr_out_flag->Value;
flag = VretVal.lVal;

ptr_insert->Release();
ptr_update->Release();
ptr_tablename->Release();
ptr_sfid->Release();
ptr_out_type->Release();
ptr_out_flag->Release();
}
catch (::_com_error e)
{
_snprintf(sz_msg, sizeof(sz_msg) - 1, "ExecStoredProc error :%s", e.ErrorMessage());
p_MainCwnd->SendMessage(MSG_INFO, 0, (LPARAM)sz_msg);
return false;
}

return true;

}
------解决思路----------------------
难道mysql没有类似SQL Server提供的bcp命令行工具用来插入大量数据吗？
------解决思路----------------------
SQL Server错误代码大全及解释