js 数据导出到excel

/*******************************************************************
* 函数名称：ExportExcel
* 功能描述：数据导出到excel
* 参数名称：无
* 修改日志：
* 修改人            修改时间             修改摘要
* qianyj            2012/08/26           Create
********************************************************************/
function ExportExcel1() {
   try {
      window.clipboardData.setData("Text", parent.zgtzgMain.document.all('tbFinance').outerHTML);
   }
   catch (e) {
      alert("请查询后再导出！");
      return;
   }
   try {
      var ExApp = new ActiveXObject("Excel.Application")
      var ExWBk = ExApp.workbooks.add()
      var ExWSh = ExWBk.worksheets(1)
      ExWSh.Name = "进退暂估财务结转数据";
      ExApp.DisplayAlerts = false
      ExApp.visible = true
   }
   catch (e) {
      alert("您的电脑没有安装Microsoft Excel软件，或者做如下尝试：打开Internet Explorer “工具”菜单栏中的“选项”一栏，单击“安全”栏中的“自定义级别”选项卡，将“对没有标记为安全的activex控件进行初始化和脚本运行”设置成“启用”即可。")
      return false
   }
   ExWBk.worksheets(1).Paste;
}

function ExportExcel()
{
     var curTbl = parent.zgtzgMain.document.all('tbFinance');
     var oXL = new ActiveXObject("Excel.Application");
     //创建AX对象excel
     var oWB = oXL.Workbooks.Add();
     //获取workbook对象
     var oSheet = oWB.ActiveSheet;
    //激活当前sheet
     var Lenr = curTbl.rows.length;
     oSheet.Columns(3).ColumnWidth = 50;

     //取得表格行数 
     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可见属性 
}