Javascript实现把网页中table的内容导入到excel中的几种方法

terryfeng

浏览: 504855 次
性别:
来自: 北京

最近访客更多访客>>

fengruitao

zjx128

slingling

星海孤舟

博主相关

博客

微博

相册

留言

关于我

文章分类

社区版块

存档分类

博客分类：

[随笔分类][10] jQuery & javaScript

Excel JavaScript IE J#脚本

一、直接拷贝整个表格到EXCEL中

二、通过遍历表格，给EXCEL中相应的单元格赋值。

三、把表格中的内容提取出来，利用IE的另存为.csv的格式。

各方法的好处：

1. 直接拷贝表格，能够保留表格中的原有的格式，比如，列，行的合并，对齐方式，底色等等，

2. 通过遍历表格，比较灵活，可以遍历表格某些需要部分的内容。

3. 利用IE的另存为，不用创建ActiveXObject对象，可以处理表格合并方面的问题。

各方法的缺点：

1. 可能弹出脚本错误：Automation不能创建对象。

解决方法：启用IE安全设置中的：对没有标记为安全的ActiveX控件进行初始化和脚本运行。

由于整个表格复制到EXCEL中，给表格加个标题，并加入到EXCEL中可能会遇到麻烦。

解决方法：首先在表格中加入第一行

X，表示整个表格的列数，复制完整个表格后,加如下代码，oSheet为当前活动的sheet.

oSheet.Range(oSheet.Cells(1, 1), oSheet.Cells(1, x)).value = "表格标题";//设置标题

oSheet.Rows(1).Font.Size = 16; //设置文字大小

oSheet.Rows(1).Font.Name = "宋体";//设置文字字体

注：以下属性我没用着，可能有用，也可能会报错

oSheet.Range(oSheet.Cells(1,1), oSheet.Cells(1,14)).mergecells=true; //合并单元格

oSheet.Range(oSheet.Cells(1,1), oSheet.Cells(1,14)).Interior.ColorIndex=6;//设置底色?

oSheet.Range(oSheet.Cells(1,1), oSheet.Cells(1,14)).Font.ColorIndex=5;//设置字体色?

oSheet.Rows(1).RowHeight=20; //设置列高

oSheet.Cells(iRow,iCol).Halignment=’2’//设置字体居中

2. 可能弹出脚本错误：Automation不能创建对象（解决方法如上）。

表格内容写入到EXCEL中无表格线（未解决）

且有单元格合并时会有问题，解决方法：合并单元格后再写数据。

oSheet.Range(oSheet.Cells(1,1), oSheet.Cells(1,14)).mergecells=true; //合并单元格

3. 表格内容写入到EXCEL中无表格线（未解决）

表格格式复杂时，会有问题，（rowspan>1 or colspan>1）,解决方法：一般都是表头格式比较复杂，可先把表头写死，然后再循环写其他数据。

网页内容如下：(可直接拷贝到记事本，然后保存为html格式，用IE打开,有问题欢迎交流:joyleo@126.com)

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"

"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<head>

<title>WEB页面导出为EXCEL文档的方法</title>

</head>

<body>

<tr>

<td colspan="5" align="center">WEB页面导出为EXCEL文档的方法</td>

</tr>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

</table>

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 += " \t";

rows -= 1;

}

outStr += curTbl.rows[j].cells[i].innerText + "\t";

if (curTbl.rows[j].cells[i].colSpan > 1) {

for (var k = 0; k < curTbl.rows[j].cells[i].colSpan - 1; k++) {

outStr += " \t";

}

if (i == 0) {

if (rows == 0 && curTbl.rows[j].cells[i].rowSpan > 1) {

rows = curTbl.rows[j].cells[i].rowSpan - 1;

}

outStr += "\r\n";

}

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>

分享到：

Javascript + xsl 实现把网页中翻页的 T ... | 一个XSL 翻页例子入门

2009-07-27 11:46
浏览 1014
评论(0)
查看更多

发表评论

您还没有登录,请您登录后再发表评论

最近访客更多访客>>

博主相关

文章分类

社区版块

存档分类

最新评论