原文http://www.cnitblog.com/junhong-cai/archive/2008/06/10/45327.html



 

<table id = "export">
    <tr><td>A</td></tr>
    <tr><td>B</td></tr>
</table>

<input type=button name="out_excel" value="Convert To Excel" onclick="AutomateExcel('export');">
<script language="javascript">

function AutomateExcel(id) 
{
    var table;
    table = document.getElementById(id);  
    var hang= table.rows.length;  
    var lie = table.rows(0).cells.length; 
    var oXL = new ActiveXObject("Excel.Application"); 
    oXL.Visible = true; 
    var oWB = oXL.Workbooks.Add(); 
    var oSheet = oWB.ActiveSheet; 

    // Add table headers going cell by cell. 
    for (i=0;i <hang;i++) 
    
        for(j=0;j <lie;j++) 
        
            oSheet.Cells(i+1,j+1).value = table.rows(i).cells(j).innerText.replace("&nbsp;",""); 
        } 
    } 
    oWB.SaveAs("c:\report.xls"); 
    oSheet.ptintout; 

    oXL.UserControl = true; 

</script>