ADO如何取得数据库中表的表名

_variant_t vFieldValue; CString strFieldValue; m_pRs=m_pConnection->OpenSchema(adSchemaTables); while(VARIANT_FALSE==m_pRs->IsEOF) { strFieldValue=(char)_bstr_t(m_pRs->GetCollect(“TABLE_TYPE”)); if(!strcmp(strFieldValue.GetBuffer(0),”TABLE”)||!strcmp(strFieldValue.GetBuffer(0),”table”)) { strFieldValue.ReleaseBuffer(); strFieldValue=(char)_bstr_t(m_pRs->GetCollect(“TABLE_NAME”)); m_ctlList.AddString(strFieldValue); ///把所有的表名加到控件 } m_pRs->MoveNext(); } m_pRs->Close();