> 
- Home Page
- > Script C#
- > Script C# Web Controls
- > Datagrid To Excel
Datagrid To Excel - << VERSIONE VB.NET >>
Esportare in Excel le righe di un Datagrid
<%@ Import Namespace="System.Data.OleDb" %>
<%@ Import Namespace="System.Data" %>
<HTML>
<script language="C#" runat="server">
OleDbConnection myConnection;
protected void Page_Load(Object sender, EventArgs e)
{
myConnection = new OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0; Data Source=" + Server.MapPath("database/utenti.mdb"));
BindGrid("id");
}
private void BindGrid(String sortfield)
{
OleDbDataAdapter myCommand = new OleDbDataAdapter("select * from utenti", myConnection);
DataSet ds = new DataSet();
myCommand.Fill(ds, "utenti");
DataView Source = ds.Tables["utenti"].DefaultView;
Source.Sort = sortfield;
MyDataGrid.DataSource=Source;
MyDataGrid.DataBind();
}
private void ToExcel(Object sender, System.EventArgs e)
{
Response.ContentType = "application/vnd.ms-excel";
Response.Charset = "";
this.EnableViewState = false;
System.IO.StringWriter tw = new System.IO.StringWriter();
System.Web.UI.HtmlTextWriter hw = new System.Web.UI.HtmlTextWriter(tw);
MyDataGrid.RenderControl(hw);
Response.Write(tw.ToString());
Response.End();
}
</script>
<body>
<form runat="server" ID="Form1">
<asp:Button id="Button1" runat="server" Text="Excel" OnClick="ToExcel"></asp:Button>
<br>
<br>
<ASP:DataGrid id="MyDataGrid" runat="server" Width="700px" BackColor="White" BorderColor="#CCCCCC"
CellPadding="3" Font-Name="Verdana" Font-Size="8pt" HeaderStyle-BackColor="#aaaadd" BorderStyle="None"
BorderWidth="1px" Font-Names="Verdana" EnableViewState="False">
<ItemStyle ForeColor="#000066"></ItemStyle>
<HeaderStyle Font-Bold="True" ForeColor="White" BackColor="#006699"></HeaderStyle>
</ASP:DataGrid><BR>
</form>
</body>
</HTML>
