vc 操作excell

vc 操作excell

CDatabase database;
  CString sDriver
= " MICROSOFT EXCEL DRIVER (*.XLS) " ; // Excel安装驱动
  CString sExcelFile = " 丝绸行情列表.xls " ;                // 要建立的Excel文件
  CString sSql;
  CFileDialog fileDlg(
false , " XLS " ,sExcelFile,OFN_OVERWRITEPROMPT, " Excel文档(*.xls)|*.xls " );
  fileDlg.DoModal();
sExcelFile
= fileDlg.GetPathName();
  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) )
    {
       
// 删除表
        try
        {
          sSql
= " drop TABLE SILKLIST " ;
          database.ExecuteSQL(sSql);
        }
       
catch (...)
        {
        }

     
// 创建表结构(姓名、年龄)
      sSql = " CREATE TABLE SILKLIST (商品名称 TEXT,交货月 TEXT,涨幅 FLOAT,价格 FLOAT,涨跌 FLOAT,买进 FLOAT,卖出 FLOAT,净持有量 FLOAT,购销总量 FLOAT) " ;
      database.ExecuteSQL(sSql);

     
// 插入数值
      for ( int i = 0 ;i < m_data.size();i ++ )
      {
          CString per
= m_data[i][ 2 ];
          per.Replace(
" % " , "" );
        sSql.Format(
" INSERT INTO SILKLIST (商品名称,交货月,涨幅,价格,涨跌,买进,卖出,净持有量,购销总量) VALUES ('%s','%s',%s,%s,%s,%s,%s,%s,%s) " ,m_data[i][ 0 ],m_data[i][ 1 ],per,m_data[i][ 3 ],m_data[i][ 4 ],m_data[i][ 5 ],m_data[i][ 6 ],m_data[i][ 7 ],m_data[i][ 8 ]);
        database.ExecuteSQL(sSql);
      }
    }     

   
// 关闭数据库
    database.Close();
  }
  CATCH_ALL(e)
  {
    TRACE1(
" Excel驱动没有安装: %s " ,sDriver);
  }
  END_CATCH_ALL;

你可能感兴趣的:(vc 操作excell)