COM组件导出Excel，关闭Excel进程，释放Excel资源

首先建议使用Excel 第三方插件。下文介绍的是Excel COM组件的问题。

-------

经常使用到Excel COM组件导出EXCEL数据。但是很多人头疼的是如何释放Excel资源。

网上有好多这方面的资料。但是方法就是那么几种。

1，强制垃圾回收。

    使用GC.Collect();强制垃圾回收。但是效果不明显，有时候根本不起作用。

2，杀掉Excel进程。

    执行完EXCEL然后杀掉进程，虽然这100%能杀掉，但是用户需要权限，还得修改服务器的设置（BS网站很难实现）。再说容易误删，这样做是有效果，但是很危险。

----------------------------

上面俩种方法都不适宜使用，那怎么办呢？

其实在MSDN上有一片文章就是关于这个问题

点击查看

文章的意思是对于每个Excel中的对象全部释放掉。

停止使用某个对象时，应使用     System.Runtime.InteropServices.Marshal.ReleaseComObject。这样可以减少 RCW 的引用计数。 要释放对变量的引用，请将变量设置为等于 Nothing 或 Null。 使用 Office 应用程序对象的 Quit 方法通知服务器关闭。

 

文章中描述的很清楚，就是释放全部资源。

 

代码

private   void  ExportExcel1(DataTable dt,  string  _strTitle)
    {
         string  newpath  =  Server.MapPath( " . " )  +   @" \ "   +  Guid.NewGuid()  +   " .xls " ;

        Excel.Application app  =   new  Excel.Application();
        Excel.Workbook wbook  =  app.Workbooks.Add(System.Reflection.Missing.Value);
        Excel.Worksheet tsheet  =  (Excel.Worksheet)wbook.ActiveSheet;

        Excel.Range ran  =   null ;

         for  ( int  i  =   0 ; i  <  dt.Rows.Count; i ++ )
        {
             for  ( int  j  =   0 ; j  <  dt.Columns.Count; j ++ )
            {
               
                ran  =  (Excel.Range)tsheet.Cells[i  +   1 , j  +   1 ];
                ran.Value2  =  dt.Rows[i][j];
                 // 释放ran
                NAR(ran);
            }
        }
        NAR(tsheet);
        wbook.Close( true ,newpath, System.Reflection.Missing.Value);
        NAR(wbook);
        app.Quit();
        NAR(app);
    }

      ///   <summary>
     ///  释放资源
     ///   </summary>
     ///   <param name="o"></param>
     private   void  NAR( object  o)
    {
         try
        {
            System.Runtime.InteropServices.Marshal.ReleaseComObject(o);
        }
         catch  { }
         finally
        {
            o  =   null ;
        }
    }

以上代码就可以解决Excel的问题，如果你觉得不明显那么再使用GC.Collect();强制回收（）。

 --------------------------------------------------------------------

以上代码在VS2005中可以正常使用。刚才测试了下VS2003竟然发现还是产生许多的Excel进程。

于是将代码修改了下。

 

 

代码

string  newpath  =  Server.MapPath( " . " )  +   @" \ "   +  Guid.NewGuid()  +   " .xls " ;
        _excel.Application app  =   new  _excel.Application();
        _excel.Workbooks wbooks  =  app.Workbooks;
        _excel.Workbook wbook  =  wbooks.Add(System.Reflection.Missing.Value);

         // VS2003中最好不要如下创建
         //  _excel.Workbook wbook = app.Workbooks.Add(System.Reflection.Missing.Value);

        _excel.Worksheet tsheet  =  (_excel.Worksheet)wbook.ActiveSheet;

         // 为 tsheet.Cells 创建 Range ，方便释放资源
        _excel.Range rans  =  (_excel.Range)tsheet.Cells;

         // 创建ran为了下面赋值时候使用
        _excel.Range ran  =   null ;

         for  ( int  i  =   0 ; i  <  dt.Rows.Count; i ++ )
        {
             for  ( int  j  =   0 ; j  <  dt.Columns.Count; j ++ )
            {
                ran  =  (_excel.Range)rans[i  +   1 , j  +   1 ];
                ran.Value2  =  dt.Rows[i][j];
                NAR(ran);
                 // 不要如下方式赋值
                 // tsheet.Cells[i + 1, j + 1] = dt.Rows[i][j];
            }
        }
        NAR(rans);
        NAR(tsheet);
         // 保存信息
        wbook.Close( true ,newpath, System.Reflection.Missing.Value);
        NAR(wbook);
        NAR(wbooks);
        app.Quit();
        NAR(app);

 

 

第一次写技术方面的内容，请大家多多包涵。

--马老虎

 

 

 

 

 

 

转载于:https://www.cnblogs.com/malaohu/archive/2010/12/24/1916194.html