2, 通过ODBC服务
2.1,类和方法使用说明
为使用CDatabase,构造一个CDatabase对象并调用它的OpenEx成员函数。这打开了一个连接。在接着构造CRecordset对象以操纵连接的数据源时,向CDatabase对象传递记录集构造程序指针。完成使用连接时调用Close成员函数并销毁CDatabase对象。Close关闭以前没有关闭的任何记录集。
#include<afxdb.h>
1.建立连接:
要建立与数据源的连接,首先应构造一个CDatabase对象,然后再调用CDatabase的Open成员函数Open函数负责建立连接,其声明为:
virtual BOOL Open(LPCTSTR lpszDSN, BOOL bExclusive = FALSE, BOOL bReadOnly = FALSE, LPCTSTRlpszConnect ="ODBC;", BOOLbUseCursorLib = TRUE ); throw( CDBException, CMemoryException );
说明:
1)参数lpszDSN指定了数据源名(构造数据源的方法将在后面介绍),在lpszConnect参数中也可包括数据源名,此时lpszDSN必需为NULL,若在函数中未提供数据源名且使lpszDSN为NULL,则会显示一个数据源对话框,用户可以在该对话框中选择一个数据源。
2)参数bExclusive说明是否独占数据源,由于目前版本的类库还不支持独占方式,故该参数的值应该是FALSE,这说明数据源是被共享的。
3)参数bReadOnly若为TRUE则对数据源的连接是只读的。
4)参数lpszConnect指定了一个连接字符串,连接字符串中可以包括数据源名、用户帐号(ID)和口令等信息,字符串中的“ODBC”表示要连接到一个ODBC数据源上。
5)参数bUseCursorLib若为TRUE,则会装载光标库,否则不装载,快照需要光标库,动态集不需要光标库。
6)若连接成功,函数返回TRUE,若返回FALSE,则说明用户在数据源对话框中按了Cancel按钮。若函数内部出现错误,则框架会产生一个异常。
例子:
1)CDatabase m_db; //在文档类中嵌入一个CDatabase对象
2)//连接到一个名为"StudentRegistration"的数据源
m_db.Open("Student Registration");
3)//在连接数据源的同时指定了用户帐号和口令
m_db.Open(NULL,FALSE,FALSE,"ODBC;DSN=Student Registration;UID=ZYF;PWD=1234");
4)m_db.Open(NULL); //将弹出一个数据源对话框
2.要从一个数据源中脱离,可调用函数Close。在脱离后,可以再次调用Open函数来建立一个新的连接。
3.调用IsOpen可判断当前是否有一个连接。
4.调用GetConnect可返回当前的连接字符串。
5.相关函数声明:
virtual void Close( );
BOOL IsOpen( ) const; //返回TRUE则表明当前有一个连接
const CString& GetConnect( ) const;
6.CDatabase的析构函数会调用Close,所以只要删除了CDatabase对象就可以与数据源脱离。
7. CDatabase类成员
数据成员
m_hdbc | 对数据源的开放数据库连接(ODBC)连接句柄。类型HDBC |
构造函数
CDatabase | 构造一个CDatabase对象。必须通过调用OpenEx或Open初始化这个对象 |
Open | 建立到数据源的一个连接(通过ODBC驱动程序) |
OpenEx | 建立到数据源的一个连接(通过ODBC驱动程序) |
Close | 关闭数据源连接 |
数据库属性
GetConnect | 返回用于连接CDatabase对象和数据源的ODBC连接字符串 |
IsOpen | 如果CDatabase对象当前与数据源连接,则返回非零 |
GetDatabaseName | 返回当前使用的数据库名字 |
CanUpdate | 如果CDatabase可更新(不是只读的),则返回非零 |
CanTransact | 如果数据源支持事务,则返回非零 |
SetLoginTimeout | 设置数据源连接试图超时的秒数 |
SetQueryTimeout | 设置数据库查询操作超时的秒数。影响以后的所有记录集调用:Open,AddNew,Edit和Delete |
GetBookmarkPersistence | 标识记录集对象上书签持久化操作 |
GetCursorCommitBehavior | 标识在打开的记录集对象上提交事务的效果 |
GetCursorRollbackBehavior | 标识在打开的记录集对象上回滚事务的效果 |
数据库操作
BeginTrans | 在连接的数据源上开始“事务”──类CRecordset的一系列可回滚的AddNew,Edit,Delete和Update成员函数调用。数据源必须支持事务才能使BeginTrans有效 |
BindParameters | 允许在调用CDatabase::ExecuteSQL前绑定参数 |
CommitTrans | 完成由从BeginTrans开始的事务。执行这个事务中改变数据源的命令 |
Rollback | 回滚当前事务期间所做变化,数据源返回到BeginTrans调用时定义的未改变的以前状况 |
Cancel | 取消第二个线程的异步操作或处理 |
ExecuteSQL | 执行一条SQL语句。不返回数据记录 |
数据库覆盖
OnSetOptions | 框架调用以设置标准连接选项。缺省实现设置查询超时值。可以通过调用SetQueryTimeout提前建立这些选项 |
想要通过ODBC直接读、写Excel表格文件,首先,应确保ODBC中已安装有Excel表格文件的驱动"MICROSOFTEXCEL DRIVER (*.XLS)"。
2.2. 在StdAfx.h文件中加入:
#include <afxdb.h>
#include <odbcinst.h>
//通过ODBC直接创建Excel文件(暂定文件名:Demo.xls)
//创建并写入Excel文件
void CRWExcel::WriteToExcel()
{
CDatabase database;
CString sDriver = "MICROSOFT EXCEL DRIVER (*.XLS)"; // Excel安装驱动
CString sExcelFile = "c:\\demo.xls"; // 要建立的Excel文件
CString sSql;
TRY
{
// 创建进行存取的字符串
sSql.Format("DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=\"%s\";DBQ=%s",sDriver,sExcelFile, sExcelFile);
// 创建数据库(既Excel表格文件)
if( database.OpenEx(sSql,CDatabase::noOdbcDialog) )
{
// 创建表结构(姓名、年龄)
sSql = "CREATE TABLE demo (Name TEXT,Age NUMBER)";
database.ExecuteSQL(sSql);
// 插入数值
sSql = "INSERT INTO demo (Name,Age) VALUES ('徐景周',26)";
database.ExecuteSQL(sSql);
sSql = "INSERT INTO demo (Name,Age) VALUES ('徐志慧',22)";
database.ExecuteSQL(sSql);
sSql = "INSERT INTO demo (Name,Age) VALUES ('郭徽',27)";
database.ExecuteSQL(sSql);
}
// 关闭数据库
database.Close();
}
CATCH_ALL(e)
{
TRACE1("Excel驱动没有安装:%s",sDriver);
}
END_CATCH_ALL;
}
3. 通过ODBC直接读取Excel文件(暂定文件名:Demo.xls)
// 读取Excel文件
void CRWExcel::ReadFromExcel()
{
CDatabase database;
CString sSql;
CString sItem1, sItem2;
CString sDriver;
CString sDsn;
CString sFile = "Demo.xls"; // 将被读取的Excel文件名
// 检索是否安装有Excel驱动"Microsoft Excel Driver (*.xls)"
sDriver = GetExcelDriver();
if (sDriver.IsEmpty())
{
// 没有发现Excel驱动
AfxMessageBox("没有安装Excel驱动!");
return;
}
// 创建进行存取的字符串
sDsn.Format("ODBC;DRIVER={%s};DSN='';DBQ=%s", sDriver, sFile);
TRY
{
// 打开数据库(既Excel文件)
database.Open(NULL, false, false, sDsn);
CRecordset recset(&database);
// 设置读取的查询语句.
sSql = "SELECT Name, Age "
"FROM demo "
"ORDER BY Name ";
// 执行查询语句
recset.Open(CRecordset::forwardOnly, sSql, CRecordset::readOnly);
// 获取查询结果
while (!recset.IsEOF())
{
//读取Excel内部数值
recset.GetFieldValue("Name", sItem1);
recset.GetFieldValue("Age", sItem2);
// 移到下一行
recset.MoveNext();
}
// 关闭数据库
database.Close();
}
CATCH(CDBException, e)
{
// 数据库操作产生异常时...
AfxMessageBox("数据库错误:" + e->m_strError);
}
END_CATCH;
}
// 获取ODBC中Excel驱动
CString CRWExcel::GetExcelDriver()
{
char szBuf[2001];
WORD cbBufMax = 2000;
WORD cbBufOut;
char *pszBuf = szBuf;
CString sDriver;
// 获取已安装驱动的名称(涵数在odbcinst.h里)
if (!SQLGetInstalledDrivers(szBuf, cbBufMax, &cbBufOut))
return "";
// 检索已安装的驱动是否有Excel...
do
{
if (strstr(pszBuf, "Excel") != 0)
{
//发现!
sDriver = CString(pszBuf);
break;
}
pszBuf = strchr(pszBuf, '\0') + 1;
}
while (pszBuf[1] != '\0');
return sDriver;
}