/* 
* 將DataGrid導(dǎo)出為Excel文件 
* 
* @param strTitle　　文件標(biāo)題 
* @param dgData　　　　待導(dǎo)出的DataGrid 
* @param iStartCol　　起始列序號(hào) 
* @param iEndCol　　結(jié)束列序號(hào) 
* 
* 創(chuàng)建人:　　calvin 
* 創(chuàng)建日期: 2005-10-08 
* 修改人:　　 
* 修改日期:
**/ 
function DataGrid2Excel(strTitle, dgData, iStartCol, iEndCol) 
{ 
　　 // 定義Excel Applicaiton Object 
　　 var appExcel = null; 
　　 // 當(dāng)前激活的工作簿 
　　 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; 
　　 } 
　　　 
　　 // 獲取當(dāng)前激活的工作部 
　　 currentWork = appExcel.Workbooks.Add(); 
　　 currentSheet = currentWork.ActiveSheet; 
　 
　　 // 填充excel內(nèi)容 
　　 // 設(shè)置標(biāo)題 
　　 currentSheet.Cells(1,1).Value = strTitle; 
　　 currentSheet.Cells(1,1).Value = dgData.innerText; 
　　 window.alert(dgData.innerHTML); 
　 
　　 // 填充內(nèi)容 
　　 for (var iRow = 0; iRow < dgData.rows.length - 1; iRow++) 
　　 { 
　　　　 // 顯示指定列的內(nèi)容 
　　　　 for (var iCol = iStartCol; iCol <= iEndCol; iCol++) 
　　　　 { 
　　　　　　 currentSheet.Cells(iRow + 2, iCol + 1).Value =　 
　　　　　　　　 dgData.rows[iRow].cells[iCol].innerText; 
　　　　 } 
　　 } 
} 
 
/**************************************************************************/ 
/** 
* 導(dǎo)出dgData中0-3列的數(shù)據(jù)到excel文件中 
**/ 
function ToExcel() 
{ 
　　 DataGrid2Excel("使用javascript導(dǎo)出excel的例子", document.getElementsById("dgData"), 0, 3); 
} 這種方法的缺點(diǎn)是： 
　?。?）了能夠在客戶端調(diào)用Excel.Application，需要把IE的安全級(jí)別設(shè)為“低”。 
　?。?）與方法一相同，還是只能導(dǎo)出當(dāng)前顯示在datagrid里面的數(shù)據(jù)，無(wú)法導(dǎo)出分頁(yè)的數(shù)據(jù)。 
　　-------------------------------------------------------------------------------- 
　　終極解決方案：將DataTable導(dǎo)出為excel 
　　好，讓我們快點(diǎn)結(jié)束這篇無(wú)聊的post。一般來(lái)說(shuō)，頁(yè)面上的datagrid是以查詢得到的一個(gè)DataTable為數(shù)據(jù)源的。那么為了把全部數(shù)據(jù)導(dǎo)入excel中，我們只要把DataTable數(shù)據(jù)源