[Jscript]Js导出Excel

代码
<html>
<script type="text/javascript">
//<![CDATA[
function Save()
{
    var ex = new ActiveXObject("Excel.Application");
    var ns = [];
    var wb = ex.Workbooks.Add();
    var sh = wb.Worksheets(1);
        sh.Name="通讯录";
    var tab = document.getElementById("tab");
    var    ra = ex.Range(sh.Cells(1,1),sh.Cells(1,tab.rows[0].cells.length));
        ra.HorizontalAlignment = -4108;
        ra.Merge();
        ra.Formula = "个人通讯录";
        ra.Font.Size = 20;
    for(var i =0;i<tab.rows.length;i++)
    {
        for(var j=0;j<tab.rows[i].cells.length;j++)
        {
            var rc = sh.Cells(2+i,j+1);
                rc.NumberFormatLocal = "@";
                rc.Formula = tab.rows[i].cells[j].innerHTML;
        }
    }
    ex.Save();
}
//]]>
</script>
<body>
<table border="1" cellpadding="5" cellspacing="0" id="tab">
<tr>
        <td>id</td>
        <td>姓名</td>
        <td>电话</td>
        <td>QQ</td>
        <td>备注</td>
    </tr>
<tr>
  <td>1</td>
  <td>竹子</td>
  <td>1234567890</td>
  <td>277543265</td>
  <td>好啊</td>
</tr>
</table>
<input type="button" value="导入Excel表中" onclick="Save()"/>
</body>
</html>

 

posted @ 2009-12-20 23:06  竹子小毅  阅读(2024)  评论(0)  编辑  收藏  举报