.NET_STAR

打造技术团队,愿与您共同开创事业!

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: :: 管理 ::

首先添加引用Miscrosoft Excel11.0
bin目录下出现Interop.Excel.dll组件

using Excel;

#region 导出Excel
/// <summary>
    ///
    /// </summary>
    /// <param name="dv">数据源</param>
    /// <param name="str">主标题</param>

    public void OutputExcel(DataView dv, string str)
    {

        //
        // TODO: 在此处添加构造函数逻辑
        //
        //dv为要输出到Excel的数据,str为标题名称
        GC.Collect();

        Application excel;// = new Application(); 
        int rowIndex = 1;
        int colIndex = 0;

        _Workbook xBk;
        _Worksheet xSt;

        excel = new ApplicationClass();

        xBk = excel.Workbooks.Add(true);

        xSt = (_Worksheet)xBk.ActiveSheet;

        //
        //取得标题
        //
        foreach (DataColumn col in dv.Table.Columns)
        {
            colIndex++;
            string ColumnName = "";
            if (col.ColumnName == "UserName")
                ColumnName = "姓名";
            else if (col.ColumnName == "UserSex")
                ColumnName = "性别";
            else if (col.ColumnName == "UserBirthday")
                ColumnName = "出生年月";
            else if (col.ColumnName == "IDCard")
                ColumnName = "身份证号";
            else if (col.ColumnName == "MarriageState")
                ColumnName = "婚姻状况";
            else if (col.ColumnName == "JobName")
                ColumnName = "职业名称";
            else if (col.ColumnName == "BusinessPhoneNo")
                ColumnName = "办公电话";
            else if (col.ColumnName == "HomePhoneNo")
                ColumnName = "住宅电话";
            else if (col.ColumnName == "MobileNo")
                ColumnName = "手机号码";
            else if (col.ColumnName == "RegistTime")
                ColumnName = "注册时间";

            excel.Cells[1, colIndex] = ColumnName;
            xSt.get_Range(excel.Cells[1, colIndex], excel.Cells[1, colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置标题格式为居中对齐
        }

        //
        //取得表格中的数据
        //
        foreach (DataRowView row in dv)
        {
            rowIndex++;
            colIndex = 0;
            foreach (DataColumn col in dv.Table.Columns)
            {
                colIndex++;
                if (col.DataType == System.Type.GetType("System.DateTime"))
                {
                    excel.Cells[rowIndex, colIndex] = (Convert.ToDateTime(row[col.ColumnName].ToString())).ToString("yyyy-MM-dd");
                    xSt.get_Range(excel.Cells[rowIndex, colIndex], excel.Cells[rowIndex, colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置日期型的字段格式为居中对齐
                }
                else
                    if (col.DataType == System.Type.GetType("System.String"))
                    {
                        excel.Cells[rowIndex, colIndex] = "'" + row[col.ColumnName].ToString();
                        xSt.get_Range(excel.Cells[rowIndex, colIndex], excel.Cells[rowIndex, colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置字符型的字段格式为居中对齐
                    }
                    else
                    {
                        excel.Cells[rowIndex, colIndex] = row[col.ColumnName].ToString();
                    }
            }
        }
        //
        //加载一个合计行
        //
        int rowSum = rowIndex + 1;
        int colSum = 2;

        #region 注释1
        /*excel.Cells[rowSum, 2] = "合计";
        xSt.get_Range(excel.Cells[rowSum, 2], excel.Cells[rowSum, 2]).HorizontalAlignment = XlHAlign.xlHAlignCenter;
        
        //设置选中的部分的颜色
        
        xSt.get_Range(excel.Cells[rowSum, colSum], excel.Cells[rowSum, colIndex]).Select();
        xSt.get_Range(excel.Cells[rowSum, colSum], excel.Cells[rowSum, colIndex]).Interior.ColorIndex = 19;//设置为浅黄色,共计有56种
        
        //取得整个报表的标题
        
        excel.Cells[2, 2] = str;
        
        //设置整个报表的标题格式
        
        xSt.get_Range(excel.Cells[2, 2], excel.Cells[2, 2]).Font.Bold = true;
        xSt.get_Range(excel.Cells[2, 2], excel.Cells[2, 2]).Font.Size = 22;
          */
        #endregion

        //设置报表表格为最适应宽度  
        xSt.get_Range(excel.Cells[2, 2], excel.Cells[rowSum, colIndex]).Select();
        xSt.get_Range(excel.Cells[2, 2], excel.Cells[rowSum, colIndex]).Columns.AutoFit();

        #region 注释2
        //
        //设置整个报表的标题为跨列居中
        //
        //xSt.get_Range(excel.Cells[2, 2], excel.Cells[2, colIndex]).Select();
        //xSt.get_Range(excel.Cells[2, 2], excel.Cells[2, colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenterAcrossSelection;
        //
        //绘制边框
        //
        //xSt.get_Range(excel.Cells[4, 2], excel.Cells[rowSum, colIndex]).Borders.LineStyle = 1;
        //xSt.get_Range(excel.Cells[4, 2], excel.Cells[rowSum, 2]).Borders[XlBordersIndex.xlEdgeLeft].Weight = XlBorderWeight.xlThick;//设置左边线加粗
        //xSt.get_Range(excel.Cells[4, 2], excel.Cells[4, colIndex]).Borders[XlBordersIndex.xlEdgeTop].Weight = XlBorderWeight.xlThick;//设置上边线加粗
        //xSt.get_Range(excel.Cells[4, colIndex], excel.Cells[rowSum, colIndex]).Borders[XlBordersIndex.xlEdgeRight].Weight = XlBorderWeight.xlThick;//设置右边线加粗
        //xSt.get_Range(excel.Cells[rowSum, 2], excel.Cells[rowSum, colIndex]).Borders[XlBordersIndex.xlEdgeBottom].Weight = XlBorderWeight.xlThick;//设置下边线加粗
        //
        #endregion

        //显示效果
        //
        excel.Visible = true;

        //xSt.Export(Server.MapPath(".")+"file://%22+this.xlfile.Text+%22.xls%22,SheetExportActionEnum.ssExportActionNone,Microsoft.Office.Interop.OWC.SheetExportFormat.ssExportHTML/);
        xBk.SaveCopyAs(Server.MapPath(filepath + ".xls")); //Server.MapPath(".") + //file://%22+this.xlfile.Text+%22.xls/

        DataSet ds = null;
        xBk.Close(false, null, null);

        excel.Quit();
        System.Runtime.InteropServices.Marshal.ReleaseComObject(xBk);
        System.Runtime.InteropServices.Marshal.ReleaseComObject(excel);
        System.Runtime.InteropServices.Marshal.ReleaseComObject(xSt);
        xBk = null;
        excel = null;
        xSt = null;
        GC.Collect();
        string path = Server.MapPath(filepath + ".xls");

        System.IO.FileInfo file = new System.IO.FileInfo(path);
        Response.Clear();
        Response.Charset = "GB2312";
        Response.ContentEncoding = System.Text.Encoding.UTF8;
        // 添加头信息,为"文件下载/另存为"对话框指定默认文件名
        Response.AddHeader("Content-Disposition", "attachment; filename=" + Server.UrlEncode(file.Name));
        // 添加头信息,指定文件大小,让浏览器能够显示下载进度
        Response.AddHeader("Content-Length", file.Length.ToString());

        // 指定返回的是一个不能被客户端读取的流,必须被下载
        Response.ContentType = "application/ms-excel";

        // 把文件流发送到客户端
        Response.WriteFile(file.FullName);
        // 停止页面的执行

        Response.End();

    }
    #endregion

 

可能会出现Com工厂错误
CLSID   {00024500-0000-0000-C000-000000000046}   的   COM   对象无效或未注册

 

必须设置Dcom权限,这个到网上去搜下,我是按下面步骤实现的

配置DCOM

具体配置方法如下:

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

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

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

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

5:点击"标识"标签,选择"交互式用户" (注意:有些系统必选这个,但也有些系统必选“启动用户”,但还有些系统选哪个都可以)

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

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

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

 

posted on 2009-02-13 11:40  雷明  阅读(412)  评论(0编辑  收藏  举报