获取ACCESS2000数据库中所有表的名称

ortuwozu17988

ortuwozu17988

2016-02-19 15:48

下面是个获取ACCESS2000数据库中所有表的名称教程,撑握了其技术要点,学起来就简单多了。赶紧跟着图老师小编一起来看看吧!

void OpenSchemaX(TCHAR *TableName)
{
HRESULT hr = S_OK;
  
::CoInitialize(NULL); //初始化Com
  
IADORecordBinding *picRs = NULL;
  
_RecordsetPtr pRstSchema("ADODB.Recordset");
_ConnectionPtr pConnection("ADODB.Connection" );
  
pConnection-ConnectionString = TableName;
pConnection-Provider = "Microsoft.Jet.OLEDB.4.0";
  
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;//获取表的类型
  
strTableType.Format("%s",(LPCSTR) table_type);
  
if(!lstrcmp(strTableType,_T("TABLE")))
{
m_strList.AddString((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) 0)
{
long nCount = pConnection-Errors-Count;
// Collection ranges from 0 to nCount -1.
for(long i = 0;i nCount;i++)
{
pErr = pConnection-Errors-GetItem(i);
CString strError;
strError.Format("Error number: %xt%s", pErr-Number, pErr-Description);
AfxMessageBox(strError);
}
}
}
  
void PrintComError(_com_error &e)
{
_bstr_t bstrSource(e.Source());
_bstr_t bstrDescription(e.Description());
  
// Print COM errors.
CString strError;
strError.Format("Error number: Description = %stCode meaning = %s",(LPCSTR) bstrDescription, e.ErrorMessage());
AfxMessageBox(strError);
}

(本文来源于图老师网站,更多请访问https://m.tulaoshi.com/bianchengyuyan/)

  调用方法:

CString strFileName;
TCHAR FileName[MAX_PATH];
TCHAR bigBuff[2048] = _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
dlg.m_ofn.lpstrFile = bigBuff;
dlg.m_ofn.nMaxFile = sizeof(bigBuff);
  
if(IDOK == dlg.DoModal() )
{
strFileName = dlg.GetPathName();
lstrcpy(FileName,strFileName);
OpenSchemaX(FileName);
}

(本文来源于图老师网站,更多请访问https://m.tulaoshi.com/bianchengyuyan/)
展开更多 50%)
分享

猜你喜欢

获取ACCESS2000数据库中所有表的名称

编程语言 网络编程
获取ACCESS2000数据库中所有表的名称

获取ACCESS2000数据库中的所有表的名称(vc + ado)

编程语言 网络编程
获取ACCESS2000数据库中的所有表的名称(vc + ado)

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

获取sql数据库所有表结构

编程语言 网络编程
获取sql数据库所有表结构

中文Access2000速成教程--1.2 使用“数据库向导”创建表

编程语言 网络编程
中文Access2000速成教程--1.2 使用“数据库向导”创建表

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

旧版数据库转换至ACCESS2000的注意事项

电脑网络
旧版数据库转换至ACCESS2000的注意事项

获取数据库表结构

电脑网络
获取数据库表结构

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

使用技巧:Vista和WinXP共享系统资源

使用技巧:Vista和WinXP共享系统资源

Rss订阅对你的网站搜索表现有好处吗?

Rss订阅对你的网站搜索表现有好处吗?
下拉加载更多内容 ↓