odbc与excel

 

CDatabase database;

CString sSql;

CString sItem1, sItem2 , sItem3;

CString sDriver;

CString sDsn;

CString sFile,sPath;

CDBVariant varValue;

//获取主程序所在路径,存在sPath中

GetModuleFileName(NULL,sPath.GetBufferSetLength(MAX_PATH+1),MAX_PATH);

sPath.ReleaseBuffer();

int nPos;

nPos=sPath.ReverseFind ('\\');

sPath=sPath.Left (nPos);

sFile = sPath + "file://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);

// 设置读取的查询语句.注意此处表名的写法,excel里的表默认为系统表所以访问表时表名应为[表名$]

sSql = "SELECT 考生编号,考生姓名,来源 "

"FROM [student2$] "

"ORDER BY 考生编号 ";

// 执行查询语句

recset.Open(CRecordset::forwardOnly, sSql, CRecordset::readOnly);

// 获取查询结果

while (!recset.IsEOF())

www.99jianzhu.com/包含内容:建筑图纸、PDF/word/ppt 流程,表格,案例,最新,免费下载,施工方案、工程书籍、建筑论文、合同表格、标准规范、CAD图纸等内容。


TOP最近更新内容

    长城小学关爱留守儿童工作制度
    园林史名词解释
  • 上一篇:做情绪的主人
  • 下一篇:最新苏教版数学六年级数学下册期中测试