对ADO的疑问！

Question

一直怀疑ADO对内存管理是不是有问题！
先上测试代码，然后说问题吧!//全局
_RecordsetPtr g_Rs;
_ConnectionPtr g_Conn;CADOTest::CADOTest()
{
    AfxOleInit();    g_Rs = NULL;
    try
    {
        g_Conn.CreateInstance(__uuidof(Connection));
        g_Conn->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ADOTest.mdb; Persist Security Info=TRUE;","","",adModeUnknown);
    }
    catch(_com_error e)
    {
        AfxMessageBox(e.ErrorMessage());
    } 
}CADOTest::~CADOTest()
{
    if (NULL != g_Rs)
    {
if(adStateClosed != g_Rs->State)
      g_Rs->Close();
g_Rs = NULL;
    }    if (NULL != g_Conn)
    {
if (adStateClosed != g_Conn->State)
              g_Conn->Close();
         g_Conn = NULL;
    }
}void CADOTest::InsertData()
{
    if(NULL != g_Conn && adStateOpen == g_Conn->State)
    {
        g_Rs.CreateInstance(__uuidof(Recordset));
        _variant_t strSQL;
        strSQL.SetString("SELECT TOP 1 * FROM ADOTable");
        g_Rs->Open(strSQL,
g_Conn.GetInterfacePtr(),
adOpenDynamic, 
adLockOptimistic,  
adCmdText);        for(int i = 1;i <= 1000;i++)
        {
            g_Rs->AddNew();
            _variant_t var;
            var.SetString("Data");
            g_Rs->PutCollect(long(0),&var);
            g_Rs->Update();
        }
         
        g_Rs.Close();
        g_Rs = NULL;
    }
}
问题在于每执行一次 InsertData()，内存就涨，然后就不下来了。
不知道哪里有问题。所以只能怀疑ADO将数据放入缓存中，没有释放。
哪位知道问题在哪，多谢赐教！
另外，代码不长，对迎测试！

Answer 1

还有 我的MDAC版本是2.81.1132.0

Answer 2

for(int i = 1;i <= 1000;i++)
        {
            g_Rs->AddNew();
            _variant_t var;
            var.SetString("Data");
            g_Rs->PutCollect(long(0),&var);
            g_Rs->Update();
        }
         
        g_Rs.Close();
        g_Rs = NULL;
应该是g_Rs->Close()吧！

Answer 3

g_Conn = NULL;
g_Rs = NULL;之前先
g_Conn.Release;
g_Rs.Release;最好是把
g_Conn 和 g_Rs 定义为CADOTest的成员变量.

Answer 4

对是g_Rs->Close();
手打代码，非复制，有误另外，我不想关闭数据库，一直处于连接状态。

Answer 5

大哥，你测过吗
_RecordsetPtr这个智能指针重载了＝操作符，=NULL是会自已调用Release;
如果自行先调用Release，再=NULL，等于调用了两次Release,不只是多于，而且在新版本中，会报错的。
Connect对像一样。至于是不是成员对象，这个只是个测试程序，只考虑方便就行。

Answer 6

C++ Language Reference  
_variant_t::Clear  
See Also   
 Collapse All Expand All    Language Filter: All Language Filter: Multiple Language Filter: Visual Basic Language Filter: C# Language Filter: C++ Language Filter: J# Language Filter: JScript  
 Visual Basic (Declaration) 
 Visual Basic (Usage) 
 C# 
 C++ 
 J# 
 JScript Microsoft SpecificClears the encapsulated VARIANT object. 
void Clear( );
 Res
Calls VariantClear on the encapsulated VARIANT object.END Microsoft Specific

Answer 7

VARIANT vtProp;
VariantInit(&vtProp);
...
VariantClear(&vtProp);

Answer 8

关于_variant_t 是对VARIANT的封装,它会管理VARIANT相关资源,以下是_variant_t析构时的定义://////////////////////////////////////////////////////////////////////////////////////////
//
// Destructor
//
//////////////////////////////////////////////////////////////////////////////////////////inline _variant_t::~_variant_t() throw()
{
    ::VariantClear(this);
}csdn的高手们哪去了?

Answer 9

关于_variant_t,再贴出 其Clear()函数// Clear the _variant_t
//
inline void _variant_t::Clear() 
{
    _com_util::CheckError(::VariantClear(this));
}
可以看出 _variant_t 析构时 与Clear函数 都是调用::VariantClear(this)
所以 不是_variant_t的问题

Answer 10

不好意思，我的应用中是用的VARIANT 。通过VariantClear解决了内存泄露问题。

Answer 11

建议用下面这个封装好的ADO类 http://www.codeproject.com/KB/database/caaadoclass1.aspx

Answer 12

  你说的这种内存增长的问题我以前也遇到过，不过我当时用的是SQL2000数据库，因为如果你不对SQL2000数据库引擎设置它的最大占用内存数的话，它会自动将你查询过的记录都保存到缓存中，用来优化查询速率，使得以后的查询命中率提高，尽管程序中对查询的记录集关闭释放都不起作用，必须在SQL2000数据库中进行内存上限的设置。
  但我不知道ACESS数据库是不是也是这样的，另外我觉得虚拟内存本来就是动态变化的，你应该确定一下内存是不是在一定时间之后只增不降。

Answer 13

这个应该不是缓存问题。缓存的话，是mssql的进程占用大量内存，现在是这个应用程序。

Answer 14

大家如果感兴趣 可以直接copy上面的代码试 一试就知

Answer 15

嘿嘿，我也注意到过这个问题，写入*.mdb文件内存会持续增长，由4M增长为24M左右会停止增长，原因也是添加数据。
涉及数据库不深，只是简单用用，个人估计内存增长原因是随着记录条数的增加，记录集会增大，也就会增加占用的内存，而记录集大小应该是有限制的，所以增长到一定内存就不再增加了。
如果是用command而不是用recordset，也许能解决内存增长的问题，因为command并不返回记录集。
不过SQL语言没学过，尝试用command语言总是出错，程序崩溃，最后人崩溃，不想搞了，就暂时放弃了，让他增长去吧，顶多也就24M，不碍事，等我搞懂了SQL再说