C++_MFC_ADO以excel文件为数据库源

C++代码

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133

/// //在StdAfx.h文件中加入： #include <afxdb.h> #include <odbcinst.h>   void Ctest_excelDlg::OnBnClickedButton1() {      //写入EXCEL      CDatabase database;      CString sDriver = _T( "MICROSOFT EXCEL DRIVER (*.XLS)" ); // Excel安装驱动      CString sExcelFile = _T( "c:\demo.xls" ); // 要建立的Excel文件      CString sSql;        TRY      {          // 创建进行存取的字符串          sSql.Format(_T( "DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=" %s ";DBQ=%s" ),sDriver, sExcelFile, sExcelFile);            // 创建数据库 (既Excel表格文件)          if ( database.OpenEx(sSql,CDatabase::noOdbcDialog) )          {          // 创建表结构(姓名、年龄)          sSql = _T( "CREATE TABLE demo (Name TEXT,Age NUMBER)" );          database.ExecuteSQL(sSql);            // 插入数值          sSql = _T( "INSERT INTO demo (Name,Age) VALUES ('徐景周',26)" );          database.ExecuteSQL(sSql);            sSql = _T( "INSERT INTO demo (Name,Age) VALUES ('徐志慧',22)" );          database.ExecuteSQL(sSql);            sSql = _T( "INSERT INTO demo (Name,Age) VALUES ('郭徽',27)" );          database.ExecuteSQL(sSql);          }      // 关闭数据库      database.Close();      }      CATCH_ALL(e)      {          TRACE1( "Excel驱动没有安装: %s" ,sDriver);      }      END_CATCH_ALL; }     void Ctest_excelDlg::OnBnClickedButton2() {      //读入EXCEL      CDatabase database;      CString sSql;      CString sItem1, sItem2;      CString sDriver;      CString sDsn;      CString sFile = _T( "c:Demo.xls" ); // 将被读取的Excel文件名        // 检索是否安装有Excel驱动 "Microsoft Excel Driver (*.xls)"      sDriver = GetExcelDriver();      if (sDriver.IsEmpty())      {          // 没有发现Excel驱动          AfxMessageBox(_T( "没有安装Excel驱动!" ));          return ;      }            // 创建进行存取的字符串          sDsn.Format(_T( "ODBC;DRIVER={%s};DSN='';DBQ=%s" ), sDriver, sFile);            TRY          {          // 打开数据库(既Excel文件)          database.Open(NULL, false , false , sDsn);            CRecordset recset(&database);            // 设置读取的查询语句.          sSql = _T( "SELECT Name, Age FROM demo ORDER BY Name " );            // 执行查询语句          recset.Open(CRecordset::forwardOnly, sSql, CRecordset::readOnly);            // 获取查询结果          while (!recset.IsEOF())          {              //读取Excel内部数值              recset.GetFieldValue(_T( "Name" ), sItem1);              recset.GetFieldValue(_T( "Age" ), sItem2);              AfxMessageBox(sItem1);              // 移到下一行              recset.MoveNext();          }            // 关闭数据库          database.Close();        }      CATCH(CDBException, e)      {          // 数据库操作产生异常时...          AfxMessageBox(_T( "数据库错误: " ) + e->m_strError);      }      END_CATCH; }     CString Ctest_excelDlg::GetExcelDriver() {      wchar_t szBuf[2001];      wchar_t excl[] = L "Excel" ;      WORD cbBufMax = 2000;      WORD cbBufOut;      wchar_t *pszBuf = szBuf;      CString sDriver;      // 获取已安装驱动的名称(函数在odbcinst.h里)      if (!SQLGetInstalledDrivers(szBuf, cbBufMax, &cbBufOut))          return L "" ;      // 检索已安装的驱动是否有Excel...      // AfxMessageBox(CString(pszBuf));      do      {          if (wcsstr(pszBuf, excl) != 0)          {              //发现 !              sDriver = CString(pszBuf);              break ;          }          wchar_t ze = { '�' };          pszBuf = wcschr(pszBuf, ze) + 1;      }      while (pszBuf[1] != '�' );            return sDriver; }