js将table导出到excel

今天做了一个系统的pv管理模块,就是建一张新表,将所有用户的pv值存进去,查询的时候再和保存动态pv的表进行连表查询,去除pv变化最大的前一百名,做出来之后,老大又说要将该数据导出来,在网上搜索了一下,发现用js将表格导出来相当方便,而且不用对数据库进行二次查询,也不会提交任何数据到服务器,直接在客户端执行就可以了,太好了,但是找了很多js函数,测试都不行,终于,找到一篇文章,发现里面有三个js函数可以用,而且都有例子,于是将我的使用心得发表出来,以供以后需要的朋友做个参考,也为自己做个备份。找到资料的代码如下:

代码
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
 
<HEAD>
  
<TITLE> New Document </TITLE>
  
<META NAME="Generator" CONTENT="EditPlus">
  
<META NAME="Author" CONTENT="">
  
<META NAME="Keywords" CONTENT="">
  
<META NAME="Description" CONTENT="">
 
</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>

将这段代码复制直接可用,而且非常好用,但是在动态页面中调用的时候,发现了一个小问题,就是该js函数不能执行,js的错误提示是:Automation服务器不能创建对象。于是又在网上找资料:发现园子里现有一篇关于这个错误的总结,我也直接贴到这里,以备不时之需,内容如下:

方法一:
开始-运行:regsvr32 scrrun.dll


方法二:
请将以下语句复制到记事本中,另存为后缀为.cmd的文件,并运行。当然在命令行下一句句运行也没问题。
echo 正在修复,这个过程可能需要几分钟,请稍候……
rundll32.exe advpack.dll /DelNodeRunDLL32 %systemroot%\System32\dacui.dll
rundll32.exe advpack.dll /DelNodeRunDLL32 %systemroot%\Catroot\icatalog.mdb
regsvr32 /s comcat.dll
regsvr32 /s asctrls.ocx
regsvr32 /s oleaut32.dll
regsvr32 /s shdocvw.dll /I
regsvr32 /s shdocvw.dll
regsvr32 /s browseui.dll
regsvr32 /s browseui.dll /I
regsvr32 /s msrating.dll
regsvr32 /s mlang.dll
regsvr32 /s hlink.dll
regsvr32 /s mshtml.dll
regsvr32 /s mshtmled.dll
regsvr32 /s urlmon.dll
regsvr32 /s plugin.ocx
regsvr32 /s sendmail.dll
regsvr32 /s mshtml.dll /i
regsvr32 /s scrobj.dll
regsvr32 /s corpol.dll
regsvr32 /s jscript.dll
regsvr32 /s msxml.dll
regsvr32 /s imgutil.dll
regsvr32 /s cryptext.dll
regsvr32 /s inseng.dll
regsvr32 /s iesetup.dll /i
regsvr32 /s cryptdlg.dll
regsvr32 /s actxprxy.dll
regsvr32 /s dispex.dll
regsvr32 /s occache.dll
regsvr32 /s iepeers.dll
regsvr32 /s urlmon.dll /i
regsvr32 /s cdfview.dll
regsvr32 /s webcheck.dll
regsvr32 /s mobsync.dll
regsvr32 /s pngfilt.dll
regsvr32 /s licmgr10.dll
regsvr32 /s hhctrl.ocx
regsvr32 /s inetcfg.dll
regsvr32 /s trialoc.dll
regsvr32 /s tdc.ocx
regsvr32 /s MSR2C.DLL
regsvr32 /s msident.dll
regsvr32 /s msieftp.dll
regsvr32 /s xmsconf.ocx
regsvr32 /s ils.dll
regsvr32 /s msoeacct.dll
regsvr32 /s wab32.dll
regsvr32 /s wabimp.dll
regsvr32 /s wabfind.dll
regsvr32 /s oemiglib.dll
regsvr32 /s directdb.dll
regsvr32 /s inetcomm.dll
regsvr32 /s msoe.dll
regsvr32 /s oeimport.dll
regsvr32 /s msdxm.ocx
regsvr32 /s dxmasf.dll
regsvr32 /s laprxy.dll
regsvr32 /s l3codecx.ax
regsvr32 /s acelpdec.ax
regsvr32 /s mpg4ds32.ax
regsvr32 /s danim.dll
regsvr32 /s Daxctle.ocx
regsvr32 /s lmrt.dll
regsvr32 /s datime.dll
regsvr32 /s dxtrans.dll
regsvr32 /s dxtmsft.dll
regsvr32 /s wshom.ocx
regsvr32 /s wshext.dll
regsvr32 /s vbscript.dll
regsvr32 /s scrrun.dll mstinit.exe /setup
regsvr32 /s msnsspc.dll /SspcCreateSspiReg
regsvr32 /s msapsspc.dll /SspcCreateSspiReg
echo.
echo.
echo 修复成功!任意键退出!
pause>nul

就是组件的注册问题,我的问题用这种方法解决了。


方法三:
一直用得好好的vs.net编辑器,突然有一天在我新建一个工程时,进行到一半时,弹出"Automation 服务器不能创建对象",然后就停住了。

我到csdn上以"Automation"关键字查阅了C#版的问题,发现有很多朋友都遇上过,而回答的朋友大部分以为提问者问的是IE解析xml文件时的那个错误 (见 http://www.csdn.net/expert/topic/757/757297.xml )

看到几个回答此类问题的,都是遇到过这个问题的朋友,他们的答案是:重装vs.net都没有作用,最后重新装操作系统才将这个问题解决。
要我装操作系统真是要我的命,所以我一直用 Copy & Paste 工程文件来达到新建工程的目的。

直到有一天,我无意中点了 vs_setup.msi 来添加 vs.net 的帮助文档(后来才知道应该点setup.exe来添加的)。vs_setup.msi进行到一半,也是出错了,一看调试结果,是FileSystemObject创建失败(感谢上帝,这里的错误信息终于是友好些了)。
vs.net的错误 "Automation 服务器不能创建对象" 是不是也是这个导致的呢?

我突然想起,前几个月在网上听说可以禁止使用FileSystemObject对象,我当时都忘了怎么操作的了,反正当时一摆弄,具体怎么操作的我也忘了,从那起我也从来没有在我的程序里用过FileSystemObject了。到google上搜索,发现禁止FileSystemObject有3种方法(http://www.sometips.com/faqs/315.htm),第一种方法:修改注册表([HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{0D43FE01-F093-11CF-8940-00A0C9054228}\ProgID]
@="Scripting.FileSystemObject"),将FileSystemObject改成一个任意的名字,只有知道该名字的用户才可以创建该对象。我查看注册表,该处的名字还是 Scripting.FileSystemObject.

那么我的FSO为何不能用呢?我突然想起原来当时我用的是第二种方法,"运行Regsvr32 scrrun.dll /u,所有用户无法创建FileSystemObject"。 当时真是太狠了些。赶快运行 Regsvr32 scrrun.dll。我试着用vs.net 创建一个工程,一阵进度提示,再也没有那个该死的 "Automation 服务器不能创建对象"

所以,遇上这类问题的朋友,仔细想想有没有动这"FileSystemObject"这个奶酪,应该都可以通过这个方法解决的。否则真的要重新安装操作系统,又要重新安装vs.net喔。


方法四:
在控制面板中打开“用户账户”,选择其中的“更改用户登录或注销的方式”时出现“automation服务器不能创建对象”的错误提示。(如果在执行其他操作时,出现这个错误提示,亦可按下面的方法解决,原因是一样的。)

解决:主要是Scripting.FileSystemObject(FSO 文本文件读写)被关闭了,开启FSO功能即可,在“运行”中执行regsvr32 scrrun.dll。

特别方法:在“运行”中执行regsvr32 shimgvw.dll


方法五:
不用重新安装操作系统和vs.net,但有些脚本需要微软的 MSXML 控件才能进入。当使用 IE 5 以上版本的缺省安全模式时,会提示是否接受 MSXML 控件,如果接受,MSXML 将自动安装到您的机器上(得等上几分钟)。如果自动安装不成功,可以自行下载和安装 MSXML 3.0。如果安装 MSXML 3 后仍然出现“Automation 服务器不能创建对象”错误,是因为您的机器禁止了所有的ActiveX,一般将 IE 的安全模式设为“中”即可

方法六:
我的机器用了上面的方法没有解决问题,用下面的方法解决了问题,大家不妨可以试试:打开Internet Explorer “工具”菜单栏中的“选项”一栏,单击“安全”栏中的“自定义级别”选项卡,将第三项“对没有标记为安全的activex控件进行初始化和脚本运行”设置成“启用”即可

我是通过最后一个方法解决的,主要原因是我将ie升级为ie7了,不知道怎么就出这个问题了,呵呵。

原文地址:https://www.cnblogs.com/jxcia_Lai/p/1765357.html