B/S下Domino视图数据导出到Excel的代码

 <script language="javascript">
function exportToExcel()
{
        var i,j;
        var oXL = new ActiveXObject("Excel.Application");
        oXL.Visible = true;
        var oWB = oXL.Workbooks.Add();
        var oSheet = oWB.ActiveSheet;
        //var tbl = document.getElementById("myData");
        var tbl = document.all.tags("TABLE")[2];
        for(i=0;i<tbl.rows.length;i++)
        {
                for(j=1;j<=tbl.rows(i).cells.length;j++)
                {
                        oSheet.Cells(i+1, j).Value = tbl.rows(i).cells(j-1).innerText;
                        
                }
        }
          oXL.Visible = true;
        oXL.UserControl = true;
}
</script>