• 从DataGrids中导出数据到Excel (转,注明了多种方式,有源代码,不过纯英文!)


     

    Exporting DataGrids to Excel...

    Ken Walker's article on exporting DataSets to Excel has proved very popular. This article by Mike Dolan presents a different technique for getting a DataGrid rather than the DataSet into Excel. We believe you will find it very useful.


    By: Mike Dolan Date: August 13, 2003 Download the code. Article Rating: 4.38 Printer Friendly Version

    I have a Datagrid with a Dataset as its datasource that I want to export to Excel. Using Ken Walker's awesome tutorial ( http://www.dotnetjohn.com/articles/articleid36.aspx) on how to pass Datasets to Excel via a component, I was able to easily send a dataset to excel from anywhere in my application. However, a few things didn't end up working out for my application. First, I needed to clean up the formatting. Second, many of my datagrids had columns that were calculated from data in the datasets. Third, the header row in Excel always contained the database column names which were sometimes unintelligible to an ordinary user. My final problem was that often the Datasets contained data necessary for the datagrid generation, but that we didn't want the end user to see.

    To remedy all these issues I came up with the a simpler and more adaptable way to export the datagrid itself to Excel. I kept the concept to a component class so that it could easily be used throughout an application.

    I created the following component. I used VS.Net and left out the "Component Designer Generated Code Region". What you will find is that the class has one method that takes in two arguments: A datagrid and a response. It works by simply writing a datagrid to the htmltextwriter just like Ken Walker's artice wrote the dataset table to the stringwriter.

    I also included sections on how to change formatting. In the application we built, we wanted our Excel exports to have a standardized look. The middle-end section shows different types of formatting changes that can be made at the class level.

    cmpDataGridToExcel.vb

    Public Class cmpDataGridToExcel
      Inherits System.ComponentModel.Component

    Public Shared Sub DataGridToExcel(ByVal dgExport As DataGrid, ByVal response As HttpResponse)
      'clean up the response.object
      response.Clear()
      response.Charset = ""
      'set the response mime type for excel
      response.ContentType = "application/vnd.ms-excel"
      'create a string writer
      Dim stringWrite As New System.IO.StringWriter()
      'create an htmltextwriter which uses the stringwriter
      Dim htmlWrite As New System.Web.UI.HtmlTextWriter(stringWrite)

      'instantiate a datagrid
      Dim dg As New DataGrid()
      ' just set the input datagrid = to the new dg grid
      dg = dgExport

      ' I want to make sure there are no annoying gridlines
      dg.GridLines = GridLines.None
      ' Make the header text bold
      dg.HeaderStyle.Font.Bold = True

      ' If needed, here's how to change colors/formatting at the component level
      'dg.HeaderStyle.ForeColor = System.Drawing.Color.Black
      'dg.ItemStyle.ForeColor = System.Drawing.Color.Black

      'bind the modified datagrid
      dg.DataBind()
      'tell the datagrid to render itself to our htmltextwriter
      dg.RenderControl(htmlWrite)
      'output the html
      response.Write(stringWrite.ToString)
      response.End()
    End Sub

    End Class

    After the component above was created/compiled, we then moved to the actual page that generated the Datagrid we would pass to the component. One of our datagrids looked like the following:

    As you can see we have totals, discounts, and Boolean approval checkboxes. Most of these fields are presented generated from data using functions. Even the store number is output of a function. The Dataset export would have looked nothing like what you see above.

    The following in based on a dataset taken from our SQL server. Just like in Ken's article, it doesn't matter how you generate the dataset or datagrid. Just create a datagrid and format it the way you want. Our datagrid above was generated with the following:

    For security and copyright reasons, I will only include a small portion of our aspx page. The datagrid we created contains mostly template columns generated in this fashion:

    InvoiceApproval.aspx Code Snippet

    <asp:BoundColumn DataField="strInvoiceNo" ReadOnly="True" HeaderText="Invoice#"></asp:BoundColumn>

    <asp:TemplateColumn HeaderText="Store #">
      <ItemTemplate>
        <%# GetStore(DataBinder.Eval(Container.DataItem, "intCustomerID")) %>
      </ItemTemplate>
    </asp:TemplateColumn>

    <asp:TemplateColumn HeaderText="LA">
      <ItemTemplate>
    <%# GetLabor(DataBinder.Eval(Container.DataItem, "dblLabor"), DataBinder.Eval(Container.DataItem, "dblService")) %>
    </ItemTemplate>
    </asp:TemplateColumn>

    GetStore and GetLabor are simply functions we called passing the database data for the customer id and labor/service charges respectively. You can create your datagrid however you want, this simply shows why a dataset export with intCustomerID and not a Store # as we needed would not work.

    A Northwind Database Example

    Every tutorial needs a full example from the Northwind or Pubs database. The following is the Example.aspx file that displays the datagrid. We are still using the same component as you see above for the export.

    The page contains one datagrid dgToExport and then a button to export. The datagrid is formatted and we expect the formatting and the headers to show exactly like this when we export to Excel.

    DataGridExport.aspx

    <%@ Page Language="vb" AutoEventWireup="false" Codebehind="DataGridExport.aspx.vb" Inherits="ExportExample.DataGridExport"%>
    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
    <HTML>
    <HEAD>
    <title>DataGridExport</title>
    <meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
    <meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
    <meta name="vs_defaultClientScript" content="JavaScript">
    <meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
    </HEAD>
    <body>
    <div align="center">
    <form id="Form1" method="post" runat="server">
    <P>
    <asp:DataGrid id="dgToExport" runat="server" BorderColor="#999999" BorderStyle="None" BorderWidth="1px" BackColor="White" CellPadding="3" GridLines="Vertical" AutoGenerateColumns="False">
      <SelectedItemStyle Font-Bold="True" ForeColor="White" BackColor="#008A8C"></SelectedItemStyle>
      <AlternatingItemStyle BackColor="Gainsboro"></AlternatingItemStyle>
    <ItemStyle ForeColor="Black" BackColor="#EEEEEE"></ItemStyle>
      <HeaderStyle Font-Bold="True" ForeColor="White" BackColor="#000084"></HeaderStyle>
      <FooterStyle ForeColor="Black" BackColor="#CCCCCC"></FooterStyle>

    <Columns>
      <asp:BoundColumn DataField="EmployeeID" ReadOnly="True" HeaderText="ID"></asp:BoundColumn>
      <asp:TemplateColumn HeaderText="Name">
        <ItemTemplate>
        <%# ReturnName(DataBinder.Eval(Container.DataItem, "LastName"), DataBinder.Eval(Container.DataItem, "FirstName")) %>
        </ItemTemplate>
      </asp:TemplateColumn>
      <asp:BoundColumn DataField="Title" ReadOnly="True" HeaderText="Title"></asp:BoundColumn>
      </Columns>

    <PagerStyle HorizontalAlign="Center" ForeColor="Black" BackColor="#999999" Mode="NumericPages"></PagerStyle>
      </asp:DataGrid>
    </P>
    <P>
    <asp:Button id="btnExport" runat="server" Text="Export to Excel"></asp:Button></P>
    </form>
    </div>
    </body>
    </HTML>

    And now to the codebehind where everything happens. Essentially I have the Northwind database table Employees coming in via the SqlDataAdapter1 to fill DataSet1. Then the datagrid is bound to the dataset. The btnExport handles the export to excel when a user clicks it. You will also see the simple function to combine names. Once the grid is exported, the names will be together in one cell. I left out the Designer code.

    DataGridExport.aspx.vb

    Public Class DataGridExport
      Inherits System.Web.UI.Page

      Protected WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand
      Protected WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand
      Protected WithEvents SqlUpdateCommand1 As System.Data.SqlClient.SqlCommand
      Protected WithEvents SqlDeleteCommand1 As System.Data.SqlClient.SqlCommand
      Protected WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection
      Protected WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter
      Protected WithEvents dgToExport As System.Web.UI.WebControls.DataGrid
      Protected WithEvents btnExport As System.Web.UI.WebControls.Button
      Protected WithEvents Form1 As System.Web.UI.HtmlControls.HtmlForm
      Protected WithEvents DataSet1 As System.Data.DataSet

      ' Web Form Designer Generated Code left out

      Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'Put user code to initialize the page here
        BindGrid()
      End Sub

      Sub BindGrid()
        ' Fill our dataset
        SqlDataAdapter1.Fill(DataSet1)
        ' Assign the dataset to our Datagrid called dgToExport
        dgToExport.DataSource = DataSet1
        ' Finally bind the datagrid
        dgToExport.DataBind()
      End Sub

      Function ReturnName(ByVal strLastName, ByVal strFirstName)
        ' This is the function I'm calling in the aspx page to show the difference
        ' between exporting a dataset versus exporting a datagrid. This function is
        ' simply going to combine the first and last names and and return the
        ' full name to the datagrid template column for "Name".
        Dim strReturn As String
        strReturn = strFirstName & " " & strLastName
        Return strReturn
      End Function

      Private Sub btnExport_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExport.Click
        ' One line handles all of the export. We're simply calling the component (cmpDataGridToExcel),
        ' then we're using it's only method (DataGridToExcel), and we're passing our DataGrid (dgToExport) and the value reponse. Note: If you're using VS.Net, once you
        ' build your solution after creating the component, Intellisense will now include your
        ' component. Just remember you have to build it first.
        '
        ' You could also modify your datagrid here before exporting it. For instance in my
        ' invoice example we had a checkbox in our datagrid. If you have one of those the export
        ' will generate an error so we simply removed the column first like this before exporting:
        ' dgToExport.Columns.Remove(dgToExport.Columns.Item(11))
        cmpDataGridToExcel.DataGridToExcel(dgToExport, Response)
      End Sub

    End Class

    And that's all there is to it. Just create the component, compile it, and then once you have your datagrid setup one line exports it nice and cleanly to Excel at the click of a button. I hope this works out and possibly improves upon Ken Walker's great article that helped me understand how this whole string writing thing worked

  • 相关阅读:
    个人学习进度(第十二周)
    第一阶段冲刺(第九天)
    搜狗输入法用户体验
    第一阶段冲刺(第八天)
    第一阶段冲刺(第七天)
    Fliter(过滤器)的认识
    一、python运算符
    virtualenv虚拟环境
    Linux命令(二)
    Linux命令(一)
  • 原文地址:https://www.cnblogs.com/dagon007/p/147772.html
Copyright © 2020-2023  润新知