JavaScript 匯出Excel 代碼

來源:互聯網
上載者:User

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
<title>WEB頁面匯出為EXCEL文檔的方法</title>
</head>
<body>
<table id="tableExcel" width="100%" border="1" cellspacing="0" cellpadding="0">
<tr>
<td colspan="5" align="center">WEB頁面匯出為EXCEL文檔的方法</td>
</tr>
<tr>
<td>欄位標題1</td>
<td>欄位標題2</td>
<td>欄位標題3</td>
<td>欄位標題4</td>
<td>欄位標題5</td>
</tr>
<tr>
<td>aaa</td>
<td>bbb</td>
<td>ccc</td>
<td>ddd</td>
<td>eee</td>
</tr>
<tr>
<td>AAA</td>
<td>BBB</td>
<td>CCC</td>
<td>DDD</td>
<td>EEE</td>
</tr>
<tr>
<td>FFF</td>
<td>GGG</td>
<td>HHH</td>
<td>III</td>
<td>JJJ</td>
</tr>
</table>
<input type="button" onclick="javascript:method1('tableExcel');" value="第一種方法匯入到EXCEL">
<input type="button" onclick="javascript:method2('tableExcel');" value="第二種方法匯入到EXCEL">
<input type="button" onclick="javascript:getXlsFromTbl('tableExcel',null);" value="第三種方法匯入到EXCEL">
<SCRIPT LANGUAGE="javascript">

function method1(tableid) {//整個表格拷貝到EXCEL中
var curTbl = document.getElementById(tableid);
var oXL = new ActiveXObject("Excel.Application");
//建立AX對象excel
var oWB = oXL.Workbooks.Add();
//擷取workbook對象
var oSheet = oWB.ActiveSheet;
//啟用當前sheet
var sel = document.body.createTextRange();
sel.moveToElementText(curTbl);
//把表格中的內容移到TextRange中
sel.select();
//全選TextRange中內容
sel.execCommand("Copy");
//複製TextRange中內容
oSheet.Paste();
//粘貼到活動的EXCEL中
oXL.Visible = true;
//設定excel可見屬性
}
function method2(tableid) //讀取表格中每個單元到EXCEL中
{
var curTbl = document.getElementById(tableid);
var oXL = new ActiveXObject("Excel.Application");
//建立AX對象excel
var oWB = oXL.Workbooks.Add();
//擷取workbook對象
var oSheet = oWB.ActiveSheet;
//啟用當前sheet
var Lenr = curTbl.rows.length;
//取得表格行數
for (i = 0; i < Lenr; i++)
{
var Lenc = curTbl.rows(i).cells.length;
//取得每行的列數
for (j = 0; j < Lenc; j++)
{
oSheet.Cells(i + 1, j + 1).value = curTbl.rows(i).cells(j).innerText;
//賦值
}
}
oXL.Visible = true;
//設定excel可見屬性
}
function getXlsFromTbl(inTblId, inWindow) {
try {
var allStr = "";
var curStr = "";
//alert("getXlsFromTbl");
if (inTblId != null && inTblId != "" && inTblId != "null") {
curStr = getTblData(inTblId, inWindow);
}

if (curStr != null) {
allStr += curStr;
}

else {
alert("你要匯出的表不存在!");
return;
}
var fileName = getExcelFileName();
doFileExport(fileName, allStr);
}
catch(e) {
alert("匯出發生異常:" + e.name + "->" + e.description + "!");
}
}

function getTblData(inTbl, inWindow) {
var rows = 0;
//alert("getTblData is " + inWindow);
var tblDocument = document;
if (!!inWindow && inWindow != "") {
if (!document.all(inWindow)) {
return null;
}
else {
tblDocument = eval(inWindow).document;
}
}

var curTbl = tblDocument.getElementById(inTbl);
var outStr = "";
if (curTbl != null) {
for (var j = 0; j < curTbl.rows.length; j++) {
//alert("j is " + j);
for (var i = 0; i < curTbl.rows[j].cells.length; i++) {
//alert("i is " + i);
if (i == 0 && rows > 0) {
outStr += "  ";
rows -= 1;
}

outStr += curTbl.rows[j].cells[i].innerText + " ";
if (curTbl.rows[j].cells[i].colSpan > 1) {
for (var k = 0; k < curTbl.rows[j].cells[i].colSpan - 1; k++) {
outStr += "  ";
}
}

if (i == 0) {
if (rows == 0 && curTbl.rows[j].cells[i].rowSpan > 1) {
rows = curTbl.rows[j].cells[i].rowSpan - 1;
}
}
}
outStr += " ";
}
}

else {
outStr = null;

alert(inTbl + "不存在!");

}

return outStr;

}

function getExcelFileName() {

var d = new Date();

var curYear = d.getYear();

var curMonth = "" + (d.getMonth() + 1);

var curDate = "" + d.getDate();

var curHour = "" + d.getHours();
var curMinute = "" + d.getMinutes();
var curSecond = "" + d.getSeconds();

if (curMonth.length == 1) {
curMonth = "0" + curMonth;
}

if (curDate.length == 1) {
curDate = "0" + curDate;
}

if (curHour.length == 1) {
curHour = "0" + curHour;
}

if (curMinute.length == 1) {
curMinute = "0" + curMinute;
}

if (curSecond.length == 1) {
curSecond = "0" + curSecond;
}

var fileName = "leo_zhang" + "_" + curYear + curMonth + curDate + "_"
+ curHour + curMinute + curSecond + ".csv";
//alert(fileName);
return fileName;
}

function doFileExport(inName, inStr) {
var xlsWin = null;
if (!!document.all("glbHideFrm")) {
xlsWin = glbHideFrm;
}

else {
var width = 6;
var height = 4;
var openPara = "left=" + (window.screen.width / 2 - width / 2)
+ ",top=" + (window.screen.height / 2 - height / 2)
+ ",scrollbars=no,width=" + width + ",height=" + height;
xlsWin = window.open("", "_blank", openPara);

}
xlsWin.document.write(inStr);

xlsWin.document.close();

xlsWin.document.execCommand('Saveas', true, inName);

xlsWin.close();

}
</SCRIPT>
</body>
</html>
---下面是處理excel 進程關閉問題----------------------

// JavaScript中的析構問題(ActiveX Object樣本)
//---------------------------------------------------------
<script>
var strSaveLocation = 'file:///E:/1.xls'

function createXLS() {
  var excel = new ActiveXObject("Excel.Application");
  var wk = excel.Workbooks.Add();
  wk.SaveAs(strSaveLocation);
  wk.Saved = true;

  excel.Quit();
}

function writeXLS() {
  var excel = new ActiveXObject("Excel.Application");
  var wk = excel.Workbooks.Open(strSaveLocation);
  var sheet = wk.Worksheets(1);
  sheet.Cells(1, 1).Value = '測試字串';
  wk.SaveAs(strSaveLocation);
  wk.Saved = true;

  excel.Quit();
}
</script>

<body>
  <button onclick="createXLS()">建立</button>
  <button onclick="writeXLS()">重寫</button>
</body>

在這個例子中,在本地檔案操作時並不會出現異常。——最多隻是有一些記憶體垃
圾而已。然而,如果strSaveLocation是一個遠端URL,這時本地將會儲存一個
檔案存取許可權的憑證,而且同時只能一個(遠端)執行個體來開啟該excel文檔並存
儲。於是如果反覆點擊"重寫"按鈕,就會出現異常。

——注意,這是在SPS中操作共用檔案時的一個執行個體的簡化代碼。因此,它並非
“學術的”無聊討論,而且工程中的實際問題。

解決這個問題的方法很複雜。它涉及到兩個問題:
  - 本地憑證的釋放
  - ActiveX Object執行個體的釋放

下面我們先從JavaScript中對象的“失效”問題說起。簡單的說:
  - 一個對象在其生存的上下文環境之外,即會失效。
  - 一個全域的對象在沒有被執用(引用)的情況下,即會失效。

例如:
//---------------------------------------------------------
// JavaScript對象何時失效
//---------------------------------------------------------
function testObject() {
  var _obj1 = new Object();
}

function testObject2() {
  var _obj2 = new Object();
  return _obj2;
}

// 樣本1
testObject();

// 樣本2
testObject2()

// 樣本3
var obj3 = testObject2();
obj3 = null;

// 樣本4
var obj4 = testObject2();
var arr = [obj4];
obj3 = null;
arr = [];

在這四個樣本中:
  - “樣本1”在函數testObject()中構造了_obj1,但是在函數退出時,
    它就已經離開了函數的上下文環境,因此_obj1失效了;
  - “樣本2”中,testObject2()中也構造了一個對象_obj2並傳出,因
    此對象有了“函數外”的上下文環境(和生存周期),然而由於函數
    的傳回值沒有被其它變數“持有”,因此_obj2也立即失效了;
  - “樣本3”中,testObject2()構造的_obj2被外部的變數obj3持用了,
    這時,直到“obj3=null”這行代碼生效時,_obj2才會因為參考關聯性
    消失而失效。
  - 與樣本3相同的原因,“樣本4”中的_obj2會在“arr=[]”這行代碼
    之後才會失效。

但是,對象的“失效”並不等會“釋放”。在JavaScript運行環境的內部,沒
有任何方式來確切地告訴使用者“對象什麼時候會釋放”。這依賴於JavaScript
的記憶體回收機制。——這種策略與.NET中的回收機制是類同的。

在前面的Excel操作範例程式碼中,對象的所有者,也就是"EXCEL.EXE"這個進程
只能在“ActiveX Object執行個體的釋放”之後才會發生。而檔案的鎖,以及操作
系統的許可權憑證是與進程相關的。因此如果對象僅是“失效”而不是“釋放”,
那麼其它進程處理檔案和引用作業系統的許可權憑據時就會出問題。

——有些人說這是JavaScript或者COM機制的BUG。其實不是,這是OS、IE
和JavaScript之間的一種複雜關係所導致的,而非獨立的問題。

Microsoft公開瞭解決這種問題的策略:主動調用記憶體回收過程。

在(微軟的)JScript中提供了一個CollectGarbage()過程(通常簡稱GC過程),
GC過程用於清理當前IE中的“失效的對象失例”,也就是調用對象的析構過程。

在上例中調用GC過程的代碼是:
//---------------------------------------------------------
// 處理ActiveX Object時,GC過程的標準調用方式
//---------------------------------------------------------
function writeXLS() {
  //(略...)

  excel.Quit();
  excel = null;
  setTimeout(CollectGarbage, 1);
}

第一行代碼調用excel.Quit()方法來使得excel進程中止並退出,這時由於JavaScript
環境執有excel對象執行個體,因此excel進程並不實際中止。

第二行代碼使excel為null,以清除對象引用,從而使對象“失效”。然而由於
對象仍舊在函數上下文環境中,因此如果直接調用GC過程,對象仍然不會被清理。

第三行代碼使用setTimeout()來調用CollectGarbage函數,時間間隔設為'1',只
是使得GC過程發生在writeXLS()函數執行完之後。這樣excel對象就滿足了“能被
GC清理”的兩個條件:沒有引用和離開上下文環境。

GC過程的使用,在使用了ActiveX Object的JS環境中很有效。一些潛在的ActiveX
Object包括XML、VML、OWC(Office Web Componet)、flash,甚至包括在JS中的VBArray。
從這一點來看,ajax架構由於採用了XMLHTTP,並且同時要滿足“不切換頁面”的
特性,因此在適當的時候主動調用GC過程,會得到更好的效率用UI體驗。

事實上,即使使用GC過程,前面提到的excel問題仍然不會被完全解決。因為IE還
緩衝了許可權憑據。使頁的許可權憑據被更新的唯一方法,只能是“切換到新的頁面”,
因此事實上在前面提到的那個SPS項目中,我採用的方法並不是GC,而是下面這一
段代碼:
//---------------------------------------------------------
// 處理ActiveX Object時採用的頁面切換代碼
//---------------------------------------------------------
function writeXLS() {
  //(略...)

  excel.Quit();
  excel = null;
 
  // 下面代碼用於解決IE call Excel的一個BUG, MSDN中提供的方法:
  //   setTimeout(CollectGarbage, 1);
  // 由於不能清除(或同步)網頁的受信任狀態, 所以將導致SaveAs()等方法在
  // 下次調用時無效.
  location.reload();
}

最後之最後,關於GC的一個補充說明:在IE表單被最小化時,IE將會主動調用一次
CollectGarbage()函數。這使得IE視窗在最小化之後,記憶體佔用會有明顯改善。

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.