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;

posted on 2010-10-12 11:01 wrh 阅读(416) 评论(0)  编辑 收藏 引用


只有注册用户登录后才能发表评论。
网站导航: 博客园   IT新闻   BlogJava   博问   Chat2DB   管理


导航

<2024年12月>
24252627282930
1234567
891011121314
15161718192021
22232425262728
2930311234

统计

常用链接

留言簿(19)

随笔档案

文章档案

收藏夹

搜索

最新评论

阅读排行榜

评论排行榜