VC2005生成Excel文件样例

来源:互联网 发布:淘宝电商培训靠谱吗 编辑:程序博客网 时间:2024/05/16 19:27
#include "afxdb.h"////////////////////////////////////////////////////////////////////////////////名称:OnWriteexcel//功能:创建并写入数据到Excel文件中//作者:徐景周(jingzhou_xu@163.net)//组织:未来工作室(Future Studio)//日期:2002.9.1/////////////////////////////////////////////////////////////////////////////void CRWExcelDlg::OnWriteexcel() {  CDatabase database;  CString sDriver = "MICROSOFT EXCEL DRIVER (*.XLS)"; // Excel安装驱动  CString sExcelFile,sPath;   CString sSql;      //获取主程序所在路径,存在sPath中  GetModuleFileName(NULL,sPath.GetBufferSetLength (MAX_PATH+1),MAX_PATH);  sPath.ReleaseBuffer ();  int nPos;  nPos=sPath.ReverseFind ('\\');  sPath=sPath.Left (nPos);  sExcelFile = sPath + "\\Demo.xls";             // 要建立的Excel文件  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 Exceldemo (Name TEXT,Age NUMBER)";      database.ExecuteSQL(sSql);      // 插入数值      sSql = "INSERT INTO Exceldemo (Name,Age) VALUES ('徐景周',26)";      database.ExecuteSQL(sSql);      sSql = "INSERT INTO Exceldemo (Name,Age) VALUES ('徐志慧',22)";      database.ExecuteSQL(sSql);      sSql = "INSERT INTO Exceldemo (Name,Age) VALUES ('郭徽',27)";      database.ExecuteSQL(sSql);    }          // 关闭数据库    database.Close();    AfxMessageBox("Excel文件写入成功!");  }  catch(CUserException ex)  {    ex.ReportError();  }}


原创粉丝点击