asp.net 导出excel 问题 （服务器的部署)

由于项目需要导出excel，网上文章一大把，只参考了一部分，但部署到服务器才发现，问题很多！

导出和下载关键代码！(WebExcel.ashx.cs)

        private void NAR(object o)
        {
            try
            {
                System.Runtime.InteropServices.Marshal.ReleaseComObject(o);
            }
            catch (Exception ex)
            {
                Console.WriteLine(ex.Message);
            }
            finally
            {
                o = null;
            }
        }

        public void ExportExcel(HttpContext context, DataSet ds, string DownloadFilePath)
        {


            object objOpt = Missing.Value;
            Application excel = new Application();
            excel.Visible = false;
            excel.DisplayAlerts = false;            
            Workbook   wkb = excel.Workbooks.Add(objOpt);
            Worksheet wks = (Worksheet)wkb.ActiveSheet;

            wks.Visible = XlSheetVisibility.xlSheetVisible;
            

            int rowIndex = 1;
            int colIndex = 0;

            // DataTable table = ds.Tables[0];
            foreach (DataColumn col in ds.Tables[0].Columns)
            {
                colIndex++;
                excel.Cells[1, colIndex] = col.ColumnName;
            }

            foreach (DataRow row in ds.Tables[0].Rows)
            {
                rowIndex++;
                colIndex = 0;
                foreach (DataColumn col in ds.Tables[0].Columns)
                {
                    colIndex++;
                    excel.Cells[rowIndex, colIndex] = row[col.ColumnName].ToString();
                }
            }
            //excel.Sheets[0] = "sss";


            wkb.SaveAs(DownloadFilePath, Microsoft.Office.Interop.Excel.XlFileFormat.xlExcel7, null, null, false, false, XlSaveAsAccessMode.xlNoChange, null, null, null, null, null);
            NAR(wks);
            wkb.Close(false, objOpt, objOpt);
            NAR(wkb);            
            excel.Quit();
            NAR(excel);
            

            if (File.Exists(DownloadFilePath))
            {

                
                using (FileStream fs = new FileStream(DownloadFilePath, FileMode.Open, FileAccess.Read, FileShare.ReadWrite))
                {
                    const int size = 4096;
                    byte[] buffer = new byte[size];
                    int pos = 0;
                    long dataToRead = fs.Length;
                    long arrange = 0;
                    if (context.Request.Headers["Range"] != null)
                    {
                        context.Response.StatusCode = 206;
                        arrange = long.Parse(context.Request.Headers["Range"].Replace("bytes=", "").Replace("-", ""));
                    }
                    if (arrange != 0)
                    {
                        context.Response.AddHeader("Content-Range", "bytes " + arrange.ToString() + "-" + ((long)(dataToRead - 1)).ToString() + "/" + dataToRead.ToString());
                    }
                    context.Response.AddHeader("Content-Length", ((long)(dataToRead - arrange)).ToString());
                    //context.Response.ContentType = "application/octet-stream";
                    context.Response.ContentType = "application/ms-excel";
                    context.Response.AddHeader("Content-Disposition", "attachment; filename=" + System.Web.HttpUtility.UrlEncode(System.Text.Encoding.GetEncoding(65001).GetBytes(Path.GetFileName(DownloadFilePath))));

                    fs.Position = arrange;
                    dataToRead = dataToRead - arrange;

                    while (dataToRead > 0)
                    {
                        if (context.Response.IsClientConnected)
                        {
                            pos = fs.Read(buffer, 0, size);

                            context.Response.OutputStream.Write(buffer, 0, pos);
                            context.Response.Flush();

                            dataToRead = dataToRead - pos;
                        }
                        else
                        {
                            dataToRead = -1;
                        }
                    }
                }
            }



 

        }

针对以下问题，作下回顾

一、服务器上没有装office

    如果要用MS的，这个问题基本不用考虑，只有安装才能解决，没有其它办法！ (即使有牛人弄出来 了，估计也是给自己找麻烦）

    不过，我只在服务器上装了一个2003精简版， 我开发是用的2007。

二、 "80080005异常"

　　"80080005异常"是应用程序对COM组件操作权限不足引起的。于是有了下面的操作：

　　1）控制面板－>管理工具－>组件服务－>计算机－>我的电脑－>DCOM-> Microsoft Excel 应用程序

    2）单击属性打开此应用程序的属性对话框。

    3） 单击标识选项卡，然后选择交互式用户。

    4） 单击默认安全性选项卡。设置当前服务器与ASP.NET相关的用户的访问权限。

　　5）单击启动权限的编辑默认值。设置ASP.NET相关的用户的访问权限。

    6)主要是network service账户 

三、 检索COM类工厂中CLSID的组件时失败80070005

　　跟前面的方法差不多  具体配置方法如下: 

　　1:在服务器上安装office的Excel软件.

　　2:在"开始"->"运行"中输入dcomcnfg.exe启动"组件服务" 

　　3:依次双击"组件服务"->"计算机"->"我的电脑"->"DCOM配置"

　　4:在"DCOM配置"中找到"Microsoft Excel 应用程序",在它上面点击右键,然后点击"属性",弹出"Microsoft Excel 应用程序属性"对话框 

　　5:点击"标识"标签,选择"交互式用户" 

　　6:点击"安全"标签,在"启动和激活权限"上点击"自定义",然后点击对应的"编辑"按钮,在弹出的"安全性"对话框中填加一个"NETWORK SERVICE"用户(注意要选择本计算机　　名),并给它赋予"本地启动"和"本地激活"权限. 

　　7:依然是"安全"标签,在"访问权限"上点击"自定义",然后点击"编辑",在弹出的"安全性"对话框中也填加一个"NETWORK SERVICE"用户,然后赋予"本地访问"权限. 

　　8.如果交互式用户设置后出现错误8000401a，可取消交互式用户，指定为administratr，可暂时解决此问题。进一步的解决方式还有待探讨。  

 另外说明：光按以上设置并不能完全保证不出问题，因为调用OFFICE的操作可能涉及其他的系统资源，很可能依然权限不够而导致问题，只是设置EXCEL应用程序后，还是可能会报80070005的错误，最保险的是应该在dcomcnfg中选中我的电脑然后右键属性－＞com安全，将里面的访问权限，启动和激活权限全都编辑默认，在当中加上network service(iis 5.0的话，要加的是asp.net用户)，并如前面对networkservice设置上相同的权限，这样基本上能保证不会再出什么问题。

四、"异常来自 HRESULT:0x800A03EC "的原因

    两种情况，1、Excel的行列都是从1开始的，如果我们习惯性的给worksheet.Cells[0, 0]或者worksheet.Cells[1, 0]或者worksheet.Cells[0, 1]赋值，就会引发该异常。

    2、这里容易出错

　　“excel.ActiveWorkbook.SaveAs(FilePath + filename, Excel.XlFileFormat.xlExcel7, null, null, false, false, Excel.XlSaveAsAccessMode.xlNoChange, null, null, null, null, null);” 

     在上面代码保存的时候，格式很重要，每个版本的值都有所不同，最开始我在2007上另存成2003版本得到的是56（也就是xlExcel8)，然而真正在代码中却是39(也就是xlExcel7)