JavaScript導(dǎo)出Excel實例詳解
本文實例講述了JavaScript導(dǎo)出Excel的方法。分享給大家供大家參考。具體實現(xiàn)方法如下:
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
<title>WEB頁面導(dǎo)出為EXCEL文檔的方法</title>
</head>
<body>
<table id="tableExcel" width="100%" border="1" cellspacing="0" cellpadding="0">
<tr>
<td colspan="5" align="center">WEB頁面導(dǎo)出為EXCEL文檔的方法</td>
</tr>
<tr>
<td>列標(biāo)題1</td>
<td>列標(biāo)題2</td>
<td>列標(biāo)題3</td>
<td>列標(biāo)題4</td>
<td>列標(biāo)題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="第一種方法導(dǎo)入到EXCEL">
<input type="button" onclick="javascript:method2('tableExcel');" value="第二種方法導(dǎo)入到EXCEL">
<input type="button" onclick="javascript:getXlsFromTbl('tableExcel',null);" value="第三種方法導(dǎo)入到EXCEL">
<SCRIPT LANGUAGE="javascript">
function method1(tableid) {//整個表格拷貝到EXCEL中
var curTbl = document.getElementByIdx_x_x(tableid);
var oXL = new ActiveXObject("Excel.Application");
//創(chuàng)建AX對象excel
var oWB = oXL.Workbooks.Add();
//獲取workbook對象
var oSheet = oWB.ActiveSheet;
//激活當(dāng)前sheet
var sel = document.body.createTextRange();
sel.moveToElementText(curTbl);
//把表格中的內(nèi)容移到TextRange中
sel.select();
//全選TextRange中內(nèi)容
sel.execCommand("Copy");
//復(fù)制TextRange中內(nèi)容
oSheet.Paste();
//粘貼到活動的EXCEL中
oXL.Visible = true;
//設(shè)置excel可見屬性
}
function method2(tableid) //讀取表格中每個單元到EXCEL中
{
var curTbl = document.getElementByIdx_x_x(tableid);
var oXL = new ActiveXObject("Excel.Application");
//創(chuàng)建AX對象excel
var oWB = oXL.Workbooks.Add();
//獲取workbook對象
var oSheet = oWB.ActiveSheet;
//激活當(dāng)前sheet
var Lenr = curTbl.rows.length;
//取得表格行數(shù)
for (i = 0; i < Lenr; i++)
{
var Lenc = curTbl.rows(i).cells.length;
//取得每行的列數(shù)
for (j = 0; j < Lenc; j++)
{
oSheet.Cells(i + 1, j + 1).value = curTbl.rows(i).cells(j).innerText;
//賦值
}
}
oXL.Visible = true;
//設(shè)置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("你要導(dǎo)出的表不存在!");
return;
}
var fileName = getExcelFileName();
doFileExport(fileName, allStr);
}
catch(e) {
alert("導(dǎo)出發(fā)生異常:" + 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_r(inWindow).document;
}
}
var curTbl = tbldocument.getElementByIdx_x_x(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 進(jìn)程關(guān)閉問題
//---------------------------------------------------------
<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()">創(chuàng)建</button>
<button onclick="writeXLS()">重寫</button>
</body>
在這個例子中,在本地文件操作時并不會出現(xiàn)異常?!疃嘀皇怯幸恍﹥?nèi)存垃圾而已。然而,如果strSaveLocation是一個遠(yuǎn)程的URL,這時本地將會保存一個文件存取權(quán)限的憑證,而且同時只能一個(遠(yuǎn)程的)實例來開啟該excel文檔并存儲。于是如果反復(fù)點擊"重寫"按鈕,就會出現(xiàn)異常。
——注意,這是在SPS中操作共享文件時的一個實例的簡化代碼。因此,它并非“學(xué)術(shù)的”無聊討論,而且工程中的實際問題。
解決這個問題的方法很復(fù)雜。它涉及到兩個問題:
① 本地憑證的釋放
② ActiveX Object實例的釋放
下面我們先從JavaScript中對象的“失效”問題說起。簡單的說:
① 一個對象在其生存的上下文環(huán)境之外,即會失效。
② 一個全局的對象在沒有被執(zhí)用(引用)的情況下,即會失效。
例如:
// 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”在函數(shù)testObject()中構(gòu)造了_obj1,但是在函數(shù)退出時,它就已經(jīng)離開了函數(shù)的上下文環(huán)境,因此_obj1失效了;
- “示例2”中,testObject2()中也構(gòu)造了一個對象_obj2并傳出,因此對象有了“函數(shù)外”的上下文環(huán)境(和生存周期),然而由于函數(shù)的返回值沒有被其它變量“持有”,因此_obj2也立即失效了;
- “示例3”中,testObject2()構(gòu)造的_obj2被外部的變量obj3持用了,這時,直到“obj3=null”這行代碼生效時,_obj2才會因為引用關(guān)系消失而失效。
- 與示例3相同的原因,“示例4”中的_obj2會在“arr=[]”這行代碼之后才會失效。
但是,對象的“失效”并不等會“釋放”。在JavaScript運行環(huán)境的內(nèi)部,沒有任何方式來確切地告訴用戶“對象什么時候會釋放”。這依賴于JavaScript的內(nèi)存回收機(jī)制?!@種策略與.NET中的回收機(jī)制是類同的。
在前面的Excel操作示例代碼中,對象的所有者,也就是"EXCEL.EXE"這個進(jìn)程只能在“ActiveX Object實例的釋放”之后才會發(fā)生。而文件的鎖,以及操作系統(tǒng)的權(quán)限憑證是與進(jìn)程相關(guān)的。因此如果對象僅是“失效”而不是“釋放”,那么其它進(jìn)程處理文件和引用操作系統(tǒng)的權(quán)限憑據(jù)時就會出問題。
——有些人說這是JavaScript或者COM機(jī)制的BUG。其實不是,這是OS、IE和JavaScript之間的一種復(fù)雜關(guān)系所導(dǎo)致的,而非獨立的問題。
Microsoft公開了解決這種問題的策略:主動調(diào)用內(nèi)存回收過程。
在(微軟的)JScript中提供了一個CollectGarbage()過程(通常簡稱GC過程),GC過程用于清理當(dāng)前IE中的“失效的對象失例”,也就是調(diào)用對象的析構(gòu)過程。
在上例中調(diào)用GC過程的代碼是:
// 處理ActiveX Object時,GC過程的標(biāo)準(zhǔn)調(diào)用方式
//---------------------------------------------------------
function writeXLS() {
//(略...)
excel.Quit();
excel = null;
setTimeout(CollectGarbage, 1);
}
第一行代碼調(diào)用excel.Quit()方法來使得excel進(jìn)程中止并退出,這時由于JavaScript環(huán)境執(zhí)有excel對象實例,因此excel進(jìn)程并不實際中止。
第二行代碼使excel為null,以清除對象引用,從而使對象“失效”。然而由于對象仍舊在函數(shù)上下文環(huán)境中,因此如果直接調(diào)用GC過程,對象仍然不會被清理。
第三行代碼使用setTimeout()來調(diào)用CollectGarbage函數(shù),時間間隔設(shè)為'1',只是使得GC過程發(fā)生在writeXLS()函數(shù)執(zhí)行完之后。這樣excel對象就滿足了“能被GC清理”的兩個條件:沒有引用和離開上下文環(huán)境。
GC過程的使用,在使用了ActiveX Object的JS環(huán)境中很有效。一些潛在的ActiveX Object包括XML、VML、OWC(Office Web Componet)、flash,甚至包括在JS中的VBArray。
從這一點來看,ajax架構(gòu)由于采用了XMLHTTP,并且同時要滿足“不切換頁面”的特性,因此在適當(dāng)?shù)臅r候主動調(diào)用GC過程,會得到更好的效率用UI體驗。
事實上,即使使用GC過程,前面提到的excel問題仍然不會被完全解決。因為IE還緩存了權(quán)限憑據(jù)。使頁的權(quán)限憑據(jù)被更新的唯一方法,只能是“切換到新的頁面”,因此事實上在前面提到的那個SPS項目中,我采用的方法并不是GC,而是下面這一段代碼:
// 處理ActiveX Object時采用的頁面切換代碼
//---------------------------------------------------------
function writeXLS() {
//(略...)
excel.Quit();
excel = null;
// 下面代碼用于解決IE call Excel的一個BUG, MSDN中提供的方法:
// setTimeout(CollectGarbage, 1);
// 由于不能清除(或同步)網(wǎng)頁的受信任狀態(tài), 所以將導(dǎo)致SaveAs()等方法在
// 下次調(diào)用時無效.
location.reload();
}
最后之最后,關(guān)于GC的一個補充說明:在IE窗體被最小化時,IE將會主動調(diào)用一次
CollectGarbage()函數(shù)。這使得IE窗口在最小化之后,內(nèi)存占用會有明顯改善。
希望本文所述對大家基于javascript的web程序設(shè)計有所幫助。
相關(guān)文章
javascript 窗口加載蒙板 內(nèi)嵌網(wǎng)頁內(nèi)容
用于在現(xiàn)有窗口上加載蒙板,在蒙板內(nèi)在嵌入其他頁面內(nèi)容2010-11-11JS表單數(shù)據(jù)驗證的正則表達(dá)式(常用)
這篇文章主要介紹了JS表單數(shù)據(jù)驗證的正則表達(dá)式,這種方法比較常用,以及使用正則表達(dá)式驗證表單的方法,本文給大家介紹非常詳細(xì),需要的的朋友參考下2017-02-02JS表示Stack類練習(xí)用棧實現(xiàn)任意進(jìn)制轉(zhuǎn)換
這篇文章主要為大家介紹了JS表示Stack類練習(xí)用棧實現(xiàn)任意進(jìn)制轉(zhuǎn)換示例詳解,有需要的朋友可以借鑒參考下,希望能夠有所幫助,祝大家多多進(jìn)步,早日升職加薪2023-04-04微信小程序?qū)崿F(xiàn)點擊卡片 翻轉(zhuǎn)效果
這篇文章主要介紹了微信小程序?qū)崿F(xiàn)點擊卡片 翻轉(zhuǎn)效果本文通過實例代碼給大家介紹的非常詳細(xì),具有一定的參考借鑒價值,需要的朋友可以參考下2019-09-09JavaScript學(xué)習(xí)總結(jié)之正則的元字符和一些簡單的應(yīng)用
這篇文章主要介紹了JavaScript學(xué)習(xí)總結(jié)之正則的元字符和一些簡單的應(yīng)用,需要的朋友可以參考下2017-06-06