`
zgqynx
  • 浏览: 1345353 次
  • 性别: Icon_minigender_1
  • 来自: 北京
社区版块
存档分类
最新评论

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

ExcelJavaScriptIEJ#脚本 
阅读更多
分享程序员赚钱方法
Javascript实现把网页中table的内容导入到excel中的几种方法
                                  
一、            直接拷贝整个表格到EXCEL中

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

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

各方法的好处：

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

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

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

各方法的缺点：

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

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

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

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

<tr><td colspan="x" align="center">&</td></tr>

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">

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

原帖http://www.cublog.cn/u/23292/showart_162129.html
有困难，找猪八戒


分享到：
| JAVA代码编写的30条建议__摘录
评论
1 楼 qingyuan914 2007-06-25  
发表评论

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

相关推荐

Magicbox
Global site tag (gtag.js) - Google Analytics