js页面导数据到Execl中

来源：互联网发布：mac怎么安装r语言编辑：程序博客网时间：2024/06/11 05:09

这两天我刚做，其实这东东超简单。不信你看，在自家机子上调试一下，这其中不会出现有些开发者所说的，在导出到Excel中，有些长数值会出现，以科学记数法的形式记录。这是原代码，希望对正在开发或将要开发这方面项目的朋友，提供点建议！呵

<html>
<head><title>页面数据导出</title>
</head>
<script language="javascript">

function ExcelPrint(){

var oXL = new ActiveXObject("Excel.Application");
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.Worksheets(1);
var Lenr = bg.rows.length;
var k=1;
for (i=0;i<Lenr;i++)
{
var Lenc = bg.rows(i).cells.length;
for (j=0;j<Lenc;j++)
{
   oSheet.Columns(k).NumberFormatLocal="@";
   k++;
   oSheet.Cells(i+1,j+1).value = bg.rows(i).cells(j).innerText;
}
}
oXL.Visible = true;
}
</script>
<body>
<table border="1" bordercolor="red" id="bg">
<tr><td colspan="3">测试实验测试实验</td>  <td colspan="3">测试实验</td></tr>
<tr><td>测试1</td><td>00000001000058</td><td>测试1</td><td>测试2</td><td>测试1</td><td>测试2</td></tr>
<tr><td>测试1</td><td>00000001000058</td><td>测试1</td><td>测试2</td><td>测试1</td><td>测试2</td></tr>
<tr><td>测试1</td><td>00000001000058</td><td>测试1</td><td>测试2</td><td>测试1</td><td>测试2</td></tr>
<tr><td>测试1</td><td>00000001000058</td><td>测试1</td><td>测试2</td><td>测试1</td><td>测试2</td></tr>
<tr><td>测试1</td><td>00000001000058</td><td>测试1</td><td>测试2</td><td>测试1</td><td>测试2</td></tr>
<tr><td>测试1</td><td>00000001000058</td><td>测试1</td><td>测试2</td><td>测试1</td><td>测试2</td></tr>
<tr><td>测试1</td><td>00000001000058</td><td>测试1</td><td>测试2</td><td>测试1</td><td>测试2</td></tr>
<tr><td>0.02</td><td>00000001000058</td><td>1000.2</td><td>0000215232658755</td><td>12587569</td><td>12547.0</td></tr></table>
<input type="button" value="dc" onclick="ExcelPrint()">
</body></html>