复制代码 代码如下:
/*
* 将DataGrid导出为Excel文件
*
* @param strTitle 文件标题
* @param dgData 待导出的DataGrid
* @param iStartCol 起始列序号
* @param iEndCol 结束列序号
*
* 创建人: calvin
* 创建日期: 2005-10-08
* 修改人:
* 修改日期:
**/
function DataGrid2Excel(strTitle, dgData, iStartCol, iEndCol)
{
// 定义Excel Applicaiton Object
var appExcel = null;
// 当前激活的工作簿
var currentWork = null;
var currentSheet = null;
try
{
// 初始化application
appExcel = new ActiveXObject("Excel.Application");
appExcel.Visible = true;
}
catch(e)
{
window.alert("Please Install Excel First");
return;
}
// 获取当前激活的工作部
currentWork = appExcel.Workbooks.Add();
currentSheet = currentWork.ActiveSheet;
// 填充excel内容
// 设置标题
currentSheet.Cells(1,1).Value = strTitle;
currentSheet.Cells(1,1).Value = dgData.innerText;
window.alert(dgData.innerHTML);
// 填充内容
for (var iRow = 0; iRow < dgData.rows.length - 1; iRow++)
{
// 显示指定列的内容
for (var iCol = iStartCol; iCol <= iEndCol; iCol++)
{
currentSheet.Cells(iRow + 2, iCol + 1).Value =
dgData.rows[iRow].cells[iCol].innerText;
}
}
}
/**************************************************************************/
/**
* 导出dgData中0-3列的数据到excel文件中
**/
function ToExcel()
{
DataGrid2Excel("使用javascript导出excel的例子", document.getElementsById("dgData"), 0, 3);
} 这种方法的缺点是：
（1）了能够在客户端调用Excel.Application，需要把IE的安全级别设为“低”。
（2）与方法一相同，还是只能导出当前显示在datagrid里面的数据，无法导出分页的数据。
--------------------------------------------------------------------------------
终极解决方案：将DataTable导出为excel
好，让我们快点结束这篇无聊的post。一般来说，页面上的datagrid是以查询得到的一个DataTable为数据源的。那么为了把全部数据导入excel中，我们只要把DataTable数据源输出为excel就可以了。
复制代码 代码如下:
/**//// <summary>
/// 把DataTable内容导出伟excel并返回客户端
/// </summary>
/// <param name="dgData">待导出的DataTable</param>
/// 创 建 人：陈文凯
/// 创建日期：2005年10月08日
/// 修 改 人：
/// 修改日期：
public static void DataTable2Excel(System.Data.DataTable dtData)
{
System.Web.UI.WebControls.DataGrid dgExport = null;
// 当前对话
System.Web.HttpContext curContext = System.Web.HttpContext.Current;
// IO用于导出并返回excel文件
System.IO.StringWriter strWriter = null;
System.Web.UI.HtmlTextWriter htmlWriter = null;
if (dtData != null)
{
// 设置编码和附件格式
curContext.Response.ContentType = "application/vnd.ms-excel";
curContext.Response.ContentEncoding =System.Text.Encoding.UTF8;
curContext.Response.Charset = "";
// 导出excel文件
strWriter = new System.IO.StringWriter();
htmlWriter = new System.Web.UI.HtmlTextWriter(strWriter);
// 为了解决dgData中可能进行了分页的情况，需要重新定义一个无分页的DataGrid
dgExport = new System.Web.UI.WebControls.DataGrid();
dgExport.DataSource = dtData.DefaultView;
dgExport.AllowPaging = false;
dgExport.DataBind();
// 返回客户端
dgExport.RenderControl(htmlWriter);
curContext.Response.Write(strWriter.ToString());
curContext.Response.End();
}
}
需要注意的是，导出excel之前要把datatable的列名更改为客户要求的文字，就ok了。因为是从DataTable导出的，所以这种方法解决了分页数据的问题，堪称终极解决方案。
