Chinaunix首页 | 论坛 | 博客
  • 博客访问: 371696
  • 博文数量: 94
  • 博客积分: 2500
  • 博客等级: 少校
  • 技术积分: 823
  • 用 户 组: 普通用户
  • 注册时间: 2006-05-04 16:49
文章分类

全部博文(94)

文章存档

2015年(1)

2011年(1)

2010年(3)

2008年(8)

2007年(55)

2006年(26)

我的朋友

分类: 数据库开发技术

2007-09-08 16:47:17

一、Dataset ->Excel

          public static System.Data.DataSet ExcelToDataTable(string strExcelFileName, string strSheetName)
  {
   //源的定义
   string strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" +
        "Data Source=" + strExcelFileName + ";" +
        "Extended Properties="Excel 8.0;HDR=YES;IMEX=1"";//"Extended Properties='Excel 8.0;HDR=NO;IMEX=1';";

  // System.Data.DataTable   schemaTable   =   objConn.GetOleDbSchemaTable(System.Data.OleDb.OleDbSchemaGuid.Tables,null);  
  // string   tableName=schemaTable.Rows[0][2].ToString().Trim();  
 
   //Sql语句
   //string strExcel = string.Format("select * from [{0}$]", strSheetName); 这是一种方法
   string strExcel = "select * from  [sheet1$]";

   //定义存放的数据表
   DataSet ds = new DataSet();
   
   //连接数据源
   OleDbConnection conn = new OleDbConnection(strConn);

   conn.Open();

   //适配到数据源
   OleDbDataAdapter adapter = new OleDbDataAdapter(strExcel, strConn);
   adapter.Fill(ds, strSheetName);

   conn.Close();

   return ds; //.Tables[strSheetName];
  }

二、Excel -> DataSet

     Excel.Application objExcel = new Excel.ApplicationClass();
    Excel.Workbooks  objBooks = null;
    Excel._Workbook  objBook = null;
    Excel.Sheets  objSheets = null;
    Excel._Worksheet objSheet = null;
    Excel.Range   objRange = null;

    objExcel.DisplayAlerts  = false ;//设置保存文件存在时不提示
    
    object objOpt  = System.Reflection.Missing.Value;
    objBooks   = (Excel.Workbooks) objExcel.Workbooks ;
    objBook    = (Excel._Workbook)(objBooks.Add(objOpt)) ;
    objSheets   = (Excel.Sheets) objBook.Worksheets ;
    objSheet   = (Excel._Worksheet)(objSheets.get_Item(1)) ;

    objSheet.Name  = "sheet1" ; // this.getFileName(dlgSaveFile.FileName) ;

    object[]  objTital = { "销售部门", "高级经理", "经理","零售店编号","零售店", "零售店级别" } ;
    objRange   = objSheet.get_Range("A1", "F1") ;
    objRange.set_Value(objOpt, objTital) ;

 

    objBook.SaveAs(dlgSaveFile.FileName,objOpt,objOpt,objOpt,objOpt,objOpt,Excel.XlSaveAsAccessMode.xlNoChange,
     objOpt,objOpt,objOpt,objOpt,objOpt) ;
    objBook.Close(true,objOpt,objOpt) ;
    objBooks.Close() ;
    objExcel.Quit() ;

阅读(1557) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~