asp.net excel 选择文件夹 批量导出

 在客户端（非服务端） ，选择本地文件夹，一次导出多个excel。

前台：

 
    

<div>
      <asp:LinkButton class="linktext" id="lnbExcel" runat="server" onclick="lnbExcel_Click" >
      导出excel</asp:LinkButton>
    </div>
      <script>
    function browseFolder(path) {


    try {


        var Message = "\u8bf7\u9009\u62e9\u6587\u4ef6\u5939"; //选择框提示信息


        var Shell = new ActiveXObject("Shell.Application");


        var Folder = Shell.BrowseForFolder(0, Message, 64, 17); //起始目录为：我的电脑


        //var Folder = Shell.BrowseForFolder(0, Message, 0); //起始目录为：桌面


        if (Folder != null) {


            Folder = Folder.items(); // 返回 FolderItems 对象


            Folder = Folder.item(); // 返回 Folderitem 对象


            Folder = Folder.Path; // 返回路径


            if (Folder.charAt(Folder.length - 1) != "\\") {


                Folder = Folder + "\\";
            }
            document.getElementById(path).value = Folder;


            return Folder;


        }


    }


    catch (e) {


        alert(e.message);


    }


}
 </script>
<table>


  <tr>


    <td>选择导入数据源：</td>


    <td><asp:TextBox ID="path"
            runat="server"></asp:TextBox></td>


    <td><input type=button value="选择" onclick="browseFolder('path')"></td>


  </tr>


</table>

后台 

 //导出EXCEL
        protected void lnbExcel_Click(object sender, EventArgs e)
        {
            #region dataTable导出到excel 弹出保存对话框
            for (int i = 0; i < 2; i++)
            {
                string saveFileName = path.Text + i;


                int rowIndex = 1;      //开始写入数据的单元格行
                int colIndex = 0;      //开始写入数据的单元格列
                System.Reflection.Missing miss = System.Reflection.Missing.Value;
                Microsoft.Office.Interop.Excel.Application mExcel = new Microsoft.Office.Interop.Excel.Application();
                mExcel.Visible = false;
                Microsoft.Office.Interop.Excel.Workbooks mBooks = (Microsoft.Office.Interop.Excel.Workbooks)mExcel.Workbooks;
                Microsoft.Office.Interop.Excel.Workbook mBook = (Microsoft.Office.Interop.Excel.Workbook)(mBooks.Add(miss));
                Microsoft.Office.Interop.Excel.Worksheet mSheet = (Microsoft.Office.Interop.Excel.Worksheet)mBook.ActiveSheet;
                //Microsoft.Office.Interop.Excel.Range er = mSheet.get_Range((object)"A1", System.Reflection.Missing.Value); //向Excel文件中写入标题文本
                //er.Value2 = fileName.Substring(0, fileName.LastIndexOf('.'));
                try
                {
                    colIndex++;
                    mSheet.Cells[1, colIndex] = "列1";//输出DataGridView列头名   




                    rowIndex++;
                    colIndex = 0;
                    colIndex++;
                    mSheet.Cells[rowIndex, colIndex] = "'" + "支部到";






                    //获取你使用的excel 的版本号
                    string _strVersion = mExcel.Version;
                    int FormatNum = 0x00;
                    if (Convert.ToDouble(_strVersion) < 12)//You use Excel 97-2003
                    {


                        FormatNum = -4143;


                    }


                    else//you use excel 2007 or later
                    {


                        FormatNum = 56;
                    }


                    //保存工作已写入数据的工作表
                    mBook.SaveAs(saveFileName, FormatNum, miss, miss, miss, miss, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange, miss, miss, miss, miss);


                    //mBook.SaveAs(saveFileName, FormatNum, miss, miss, miss, miss, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange, miss, miss, miss, miss);
                }
                catch (Exception ee)
                {
                    throw new Exception(ee.Message);
                }
                            finally    //finally中的代码主要用来释放内存和中止进程()
                {
                    mBook.Close(true, miss, miss);
                    mBooks.Close();
                    mExcel.Quit();
                    //System.Runtime.InteropServices.Marshal.ReleaseComObject(er);
                    System.Runtime.InteropServices.Marshal.ReleaseComObject(mSheet);
                    System.Runtime.InteropServices.Marshal.ReleaseComObject(mBook);
                    System.Runtime.InteropServices.Marshal.ReleaseComObject(mBooks);
                    System.Runtime.InteropServices.Marshal.ReleaseComObject(mExcel);
                    GC.Collect();
                }
            }
            #endregion

命名空间  using Microsoft.Office.Interop.Excel;

IE测试通过。在文件名冲突时可能报其他错误。

另，在可能受服务端excel配置影响报一下错误：

  检索 COM 类工厂中 CLSID 为 {00024500-0000-0000-C000-000000000046} 的组件失败，原因是出现以下错误: 80070005 拒绝访问。 (异常来自 HRESULT:0x80070005 (E_ACCESSDENIED))。 
说明: 执行当前 Web 请求期间，出现未经处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及代码中导致错误的出处的详细信息。 

异常详细信息: System.UnauthorizedAccessException: 检索 COM 类工厂中 CLSID 为 {00024500-0000-0000-C000-000000000046} 的组件失败，原因是出现以下错误: 80070005 拒绝访问。 (异常来自 HRESULT:0x80070005 (E_ACCESSDENIED))。  （部分）...

附加决解方案连接 http://blog.csdn.net/zijings8374/article/details/4256005 （未测试 0..0）

检索COM 类工厂中CLSID 为 {00024500-0000-0000-C000-000000000046}的组件时失败

在项目中将数据导出为Excel格式时出现“检索COM 类工厂中CLSID 为 {00024500-0000-0000-C000-000000000046}的组件时失败，原因是出现以下错误: 80070005”，从网上搜了一下有如下解决方案：

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

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

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

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

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

6:点击"安全"标签,在"启动和激活权限"上点击"自定义",然后点击对应的"编辑"按钮,在弹出的"安全性"对话框中填加

一个"ASP.net"用户(注意要选择本计算机名),并给它赋予"本地启动"和"本地激活"权限.

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

这样,我们便配置好了相应的Excel的DCOM权限.

注意:这是在WINxp上配置的,在2003上，ASP.net用户改为NETWORK SERVICE用户。

根据上述操作了一遍，结果还是这个错误，后来在组件服务中又将“Microsoft Office Excel 预览器”配置了一遍才解决问题，配置过程如下：

1、在"DCOM配置"中找到"Microsoft Office Excel 预览器",在它上面点击右键,然后点击"属性",弹出"Microsoft Office Excel 预览器属性"对话框

2、点击"安全"标签,在"启动和激活权限"上点击"自定义",然后点击对应的"编辑"按钮,在弹出的"安全性"对话框中填加