读写Excel数据

==========获取ODBC中Excel驱动===================

#include <afxdb.h> 

#include <odbcinst.h>

CString CxxDlg::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;

}

========写入excel============

void CxxDlg::OnWriteexcel()

{

  CDatabase database;

  // Excel安装驱动

  CString sDriver= "MICROSOFT EXCEL DRIVER (*.XLS)"; 

  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);

  // 要建立的Excel文件

  sExcelFile = sPath + "\\Demo.xls";

 

  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) )

    {  

      // 创建表（把excel工作表当成数据库的表）
 sSql = "CREATE TABLE Exceldemo (Name TEXT,Age NUMBER, Sex TEXT)";

      database.ExecuteSQL(sSql);

      // 插入数值

      sSql = "INSERT INTO Exceldemo (Name,Age,Sex) VALUES ('徐景周',0,'男')";

      database.ExecuteSQL(sSql);

      sSql = "INSERT INTO Exceldemo (Name,Age,Sex) VALUES ('徐志慧',0,'女')";

      database.ExecuteSQL(sSql);

      sSql = "INSERT INTO Exceldemo (Name,Age,Sex) VALUES ('郭徽',0,'男')";

      database.ExecuteSQL(sSql);
 sSql = "CREATE TABLE Exceldemo (Name TEXT,Age NUMBER, Sex TEXT)";
 

    }      

     // 关闭数据库

    database.Close();

AfxMessageBox("Excel文件写入成功！");

  }

  CATCH_ALL(e)

  {

    TRACE1("Excel驱动没有安装: %s",sDriver);

  }

  END_CATCH_ALL;

}

============读取excel===========

void CxxDlg::OnReadexcel()

{
CDatabase database;

    CString sSql;

    CString sItem1,sItem2,sItem3;

    CString sDriver;

    CString sDsn;

    CString sFile,sPath;

//获取主程序所在路径,存在sPath中
GetModuleFileName(NULL,sPath.GetBufferSetLength (MAX_PATH+1),MAX_PATH);
sPath.ReleaseBuffer ();

    int nPos;
nPos=sPath.ReverseFind ('\\');
sPath=sPath.Left (nPos);
// 将被读取的Excel文件名
sFile = sPath + "\\Demo.xls";

    // 检索是否安装有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,Sex"
" FROM Exceldemo" 
" ORDER BY Name";

    

        // 执行查询语句

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

        // 获取查询结果

        while (!recset.IsEOF())

        {

            //读取Excel内部数值

            recset.GetFieldValue("Name", sItem1);

            recset.GetFieldValue("Age", sItem2);
recset.GetFieldValue("Sex", sItem3);
//显示记取的内容
m_ExcelList.AddString(sItem1 +"-->"+ sItem2 +"-->"+ sItem3 );

            // 移到下一行

            recset.MoveNext();

        }

        // 关闭数据库

        database.Close();

                             

    }

    CATCH(CDBException, e)

    {

        // 数据库操作产生异常时...

        AfxMessageBox("数据库错误: " + e->m_strError);

    }

    END_CATCH;

}

ps:ODBC数据库的操作的重要性