Win server 2008 Ado 内存泄露

[wulathink]

我正在写一个程序需要在win server 2008下频繁使用ADO访问SQL server 进行数据的更新、查询等操作。但是我发现每次使与SQL交互时程序使用的内存都会增长，相关代码如下：

BOOL CAdoDB::ExecuteSQL(string strSQL, string &strError,BOOL bTrans)
{
	if(strSQL.empty())
	{
		strError="SQL字符串不能为空！";
		return FALSE;
	}
	if(m_pCON==NULL)
	{
		if(!IsOpen())
		{
			strError="打开连接失败！ NULL";
			return FALSE;
		}
	}else if (m_pCON->GetState()!=adStateOpen)
	{
		if(!IsOpen())
		{
			strError="打开连接失败！ not adStateOpen";
			return FALSE;
		}
	}
	_variant_t rstAffected;
	BSTR _bstrSQL;

	try
	{
		_bstrSQL=_com_util::ConvertStringToBSTR(strSQL.c_str());
 		if(bTrans)
 			m_pCON->BeginTrans();

		m_pCON->Execute(_bstrSQL,&rstAffected,adCmdText);

 		if(bTrans)
 			m_pCON->CommitTrans();

		SysFreeString(_bstrSQL);
	}
	catch (_com_error &e)
	{
		SysFreeString(_bstrSQL);

		if(bTrans)
			m_pCON->RollbackTrans();
		if(m_pCON->GetState()==adStateOpen)
			m_pCON->Close();
		strError=(LPCSTR)e.Description();
		return FALSE;
	}
	return TRUE;
}

ReleaseCON()
{
	try
	{
		if(m_pCMD!=NULL)
		{
			m_pCMD->Release();
			m_pCMD=NULL;
		}
	}
	catch(_com_error &e)  
	{
		e.Description();
	}

	if(m_pCON!=NULL)
	{
		try
		{
			if(m_pCON->State!=adStateClosed)
			{
				m_pCON->Close();
				m_pCON.Release();
			}
			m_pCON=NULL;
		}
		catch(_com_error &e)  
		{
			e.Description();
		}
	}
	if(m_pRCD!=NULL)
	{
		try
		{
			if(m_pRCD->State!=adStateClosed)
			{
				m_pRCD->Close();
				m_pRCD.Release();
			}
			m_pCON=NULL;
		}
		catch(_com_error &e)  
		{
			e.Description();
		}
	}
}

每次执行完execute之后都会执行release函数。请问是我代码的问题吗？还是真的ADO问题呢？

微软官网上http://support.microsoft.com/kb/283106/zh-cn也有关于内存泄露的文档，但是好像不适合我的情况，因为我的是WIN SERVER 2008

[勤奋的小游侠]

不是很了解Ado.说下几个觉得可能有问题的地方：

       try
        {
            if(m_pCON->State!=adStateClosed)
            {
                m_pCON->Close();//要是这里抛出异常，下面的释放代码岂不是不能执行？
                m_pCON.Release();
            }
            m_pCON=NULL;
        }
        catch(_com_error &e)  
        {
            e.Description();
        }

 catch (_com_error &e)
    {//要是异常不是_com_error ,这个FreeString是不是也不能执行到？
        SysFreeString(_bstrSQL);

[wulathink]

引用 1 楼 lovesmiles 的回复:

不是很了解Ado.说下几个觉得可能有问题的地方：

       try
        {
            if(m_pCON->State!=adStateClosed)
            {
                m_pCON->Close();//要是这里抛出异常，下面的释放代码岂不是不能执行？
                m_pCON.Release();
            }
            m_pCON=NULL;
        }
        catch(_com_error &e)  
        {
            e.Description();
        }

 catch (_com_error &e)
    {//要是异常不是_com_error ,这个FreeString是不是也不能执行到？
        SysFreeString(_bstrSQL);

有道理，我试下