獲取ACCESS2000數據庫中所有表的名稱

void OpenSchemaX(TCHAR *TableName)
{
HRESULT hr = S_OK;

::CoInitialize(NULL); //初始化Com

IADORecordBinding *picRs = NULL;

_RecordsetPtr pRstSchema(ADODBRecordset);
_ConnectionPtr pConnection(ADODBConnection );

pConnection>ConnectionString = TableName;
pConnection>Provider = MicrosoftJetOLEDB;

try
{
pConnection>Open(pConnection>ConnectionString adModeUnknown);
pRstSchema>QueryInterface(
__uuidof(IADORecordBinding) (LPVOID*)&picRs);

pRstSchema = pConnection>OpenSchema(adSchemaTables);//枚舉表的名稱處理

while(!(pRstSchema>EndOfFile))
{
CString strTableType;

_bstr_t table_name = pRstSchema>Fields>
GetItem(TABLE_NAME)>Value;//獲取表的名稱

_bstr_t table_type = pRstSchema>Fields>
GetItem(TABLE_TYPE)>Value;//獲取表的類型

strTableTypeFormat(%s(LPCSTR) table_type);

if(!lstrcmp(strTableType_T(TABLE)))
{
m_strListAddString((LPCSTR) table_name);//添加表的名稱
}

pRstSchema>MoveNext();
}
// Clean up objects before exit

pRstSchema>Close();
pConnection>Close();
}

catch (_com_error &e)
{
// Notify the user of errors if any
// Pass a connection pointer accessed from the Connection
PrintProviderError(pConnection);
PrintComError(e);
}
CoUninitialize();
}

void PrintProviderError(_ConnectionPtr pConnection)
{
ErrorPtr pErr = NULL;

if( (pConnection>Errors>Count) > )
{
long nCount = pConnection>Errors>Count;
// Collection ranges from to nCount
for(long i = ;i < nCount;i++)
{
pErr = pConnection>Errors>GetItem(i);
CString strError;
strErrorFormat(Error number: %x %s pErr>Number pErr>Description);
AfxMessageBox(strError);
}
}
}

void PrintComError(_com_error &e)
{
_bstr_t bstrSource(eSource());
_bstr_t bstrDescription(eDescription());

// Print COM errors
CString strError;
strErrorFormat(Error number: Description = %s Code meaning = %s(LPCSTR) bstrDescription eErrorMessage());
AfxMessageBox(strError);
}

調用方法

CString strFileName;
TCHAR FileName[MAX_PATH];
TCHAR bigBuff[] = _T(); // maximum common dialog buffer size
TCHAR szFilter[] = _T(Text Files (*mdb)|*mdb|All Files (**)|**
);
CFileDialog dlg(TRUE NULL NULL
OFN_HIDEREADONLY | OFN_ALLOWMULTISELECT szFilter);

// Modify OPENFILENAME members directly to point to bigBuff
dlgm_ofnlpstrFile = bigBuff;
dlgm_ofnnMaxFile = sizeof(bigBuff);

if(IDOK == dlgDoModal() )
{
strFileName = dlgGetPathName();
lstrcpy(FileNamestrFileName);
OpenSchemaX(FileName);
}（出處風閃網路學院）