MFC---导出 Excel 方法

最新推荐文章于 2025-05-23 13:22:30 发布

转载最新推荐文章于 2025-05-23 13:22:30 发布 · 194 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/char-cheng/p/11026937.html

文章标签：

#数据库

本文详细介绍了一种利用Excel驱动进行数据写入的方法，包括创建Excel文件、安装驱动、使用ODBC连接数据库、创建表及插入数据的具体步骤，并提供了一个完整的代码示例。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

本方法通过Excel驱动写入

请添加头文件

#include"afxdb.h"

第一步创建Excel文件安装驱动

CString FileName = L"first.xls";
	CString sDriver = L"MICROSOFT EXCEL DRIVER (*.XLS)"; // Excel安装驱动	

	CString FILEEXCEL;
	FILEEXCEL.Format(L"DRIVER={%s};DSN='''';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=\"%s\";DBQ=%s", sDriver, FileName, FileName);

第二步打开数据库创建表

CDatabase date;
	CString ssql;
	if (date.OpenEx(FILEEXCEL, CDatabase::noOdbcDialog))
	{
		date.ExecuteSQL(L"CREATE TABLE 记录表(FIR text,FIC text);");    // 字段为：名称+类型
		//插入数据 
		for (int i = 0; i < 10; i++)
		{
			ssql.Format(L"INSERT INTO 记录表(FIR,FIC) VALUES('%d','%d');", i, i);
			date.ExecuteSQL(ssql);
		}
		//关闭驱动
		date.ExecuteSQL(ssql);
	}
	else
	{
		AfxMessageBox(L"没有Excel驱动");
	}

请看例子：代码[完整版]

void CExcelChangeDlg::OnBnClickedButton1()
{

	CString FileName = L"first.xls";
	CString sDriver = L"MICROSOFT EXCEL DRIVER (*.XLS)"; // Excel安装驱动	

	CString FILEEXCEL;
	FILEEXCEL.Format(L"DRIVER={%s};DSN='''';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=\"%s\";DBQ=%s", sDriver, FileName, FileName);


	CDatabase date;
	CString ssql;
	if (date.OpenEx(FILEEXCEL, CDatabase::noOdbcDialog))
	{
		date.ExecuteSQL(L"CREATE TABLE 记录表(FIR text,FIC text);");
		
		//插入数据    // 如需遍历数据库插入请使用类似方法
		
		for (int i = 0; i < 10; i++)
		{
			ssql.Format(L"INSERT INTO 记录表(FIR,FIC) VALUES('%d','%d');", i, i);
			date.ExecuteSQL(ssql);
		}
		//关闭驱动
		date.ExecuteSQL(ssql);
	}
	else
	{
		AfxMessageBox(L"没有Excel驱动");
	}
	
	AfxMessageBox(L"导出完成！");

}