MFC ODBC 访问 数据库如何获取到所有表名? ADO方式呢？

[此贴子已经被作者于2007-1-29 16:47:08编辑过]

楼上的这个好象是获取指定表的所有记录呢？
我的意思是：ODBC DNS指定的数据库如example,其中包含50张表，我想把所有的表名列出来放到ListBox中供用户选择。

    _RecordsetPtr rst,DeleRst;
    rst.CreateInstance(__uuidof(Recordset));
    rst=cnn->OpenSchema(adSchemaTables);
    _variant_t vTableName,vTableType;
    CString sSQL;
    rst->MoveFirst();
    CString sType;
    CString pName[255];
    int nIndex=0;
    while(!rst->_EOF)
    {
        vTableType=rst->GetCollect("TABLE_TYPE");
        vTableName=rst->GetCollect("TABLE_NAME");
        if(vTableType.vt!=VT_NULL && vTableName.vt!=VT_NULL)
        {
            sType=(char*)(_bstr_t)vTableType;
            if(sType=="TABLE")
            {
                CString strTemp;
            //    MessageBox("Hi");
                strTemp.Format("%s",(char*)(_bstr_t)vTableName);
                m_comboSheet.AddString(strTemp);                
           }
        }
        rst->MoveNext();
    }

[此贴子已经被作者于2007-1-30 17:47:03编辑过]