<title>浏览器表格导出到Excel</title> <input type="button" name="out_word1" οnclick="AutomateExcel()" value="导出到excel" class="notPrint"> <table id="data" width="200" border="1"> <tr> <td>11</td> <td>11</td> </tr> <tr> <td>22</td> <td>22</td> </tr> <tr> <td>33</td> <td>33</td> </tr> <tr> <td>44 </td> <td>44</td> </tr> </table> <SCRIPT LANGUAGE="JavaScript"> function AutomateExcel() { // Start Excel and get Application object. var oXL = new ActiveXObject("Excel.Application"); // Get a new workbook. var oWB = oXL.Workbooks.Add(); var oSheet = oWB.ActiveSheet; var table = document.all.data; var hang = table.rows.length; var lie = table.rows(0).cells.length; // 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; } } oXL.Visible = true; oXL.UserControl = true; } </SCRIPT>