ADO开发中如何得到表格字段名

　　 新建一 VC MFCAppWizard(exe)工程，类型为Dialog based； 　　

　　添加一按钮名为“显示字段”，添加一 Listbox控件； 　　

　　创建 Access数据库FTI.mdb； 　　

　　 运行效果如图所示:　　

　　

　　

　　1. 代码说明

　　(1)在 stdafx.h 加入如下代码引入 ADO 库定义文件，

　　#import "c:\program files\common files\system\ado\msado15.dll" \ no_namespace \
　　 rename ("EOF", "adoEOF")　　

　　(2)初始化COM库，在BOOL CGetFieldNameApp::InitInstance()中添加AfxOleInit(); 　　

　　(3)在类 CgetFieldNameDlg 中添加两个用于打开数据库连接和打开记录集的变量； _ConnectionPtr m_pConnection;
　　 _RecordsetPtr m_pRecordset;　　

　　(4) 在CgetFieldNameDlg的构造函数中添加数据库连接和记录集初始化代码；m_pConnection.CreateInstance(__uuidof(Connection));
　　try

　　{
　　 m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\\FTI.mdb",
　　 "",
　　 "",
　　 adModeUnknown
　　 );
　　}

　　catch(_com_error e)
　　{
　　 AfxMessageBox("数据库连接失败!");
　　}

　　m_pRecordset.CreateInstance(__uuidof(Recordset));

　　(5) 给Listbox控件添加控件变量m_FieldsList；

　　(6) 在按钮的单击事件中添加相应代码；_bstr_t mStrSQL;

　　CString strColName;
　　BSTR bstrColName;
　　long ColCount,i;
　　Field * field = NULL;
　　HRESULT hr;
　　Fields * fields = NULL;
　　LPCTSTR nameField;　　

　　//打开记录集，得到字段名，并将字段名信息添加到ListBox中　　

　　mStrSQL = "SELECT * FROM Images";
　　m_pRecordset->Open(mStrSQL,
　　 m_pConnection.GetInterfacePtr(),
　　 adOpenDynamic,
　　 adLockOptimistic,
　　 adCmdText);
　　hr = m_pRecordset->get_Fields (